program pil_5_12(output);
var
	x : real;
begin
	WriteLn('   x   sin(x) cos(x) ');
  WriteLn('---------------------');
  x := 0.0;
	repeat
		writeLn(x:1:4, ' ', sin(x):1:4, ' ',cos(x):1:4);
    x := x+0.1;
  until x>1.01;
end.