program zadaniye1;
var x,y:real;
begin
writeln('x=');
readln(x);
writeln('y=');
readln(y);
writeln('sin x=',sin(x):0:3);
writeln('sin y=',sin(y):0:3);
readln;
end.

program zadaniye2;
var x,z:real;
begin
writeln('x=');
readln(x);
z:=abs(sin(sqr(x)));
writeln('z=',z:0:3);
readln;
end.