program p1;
var x:integer;
    sx,sx2,sx3,grad:real;
begin
x:=0;
while (x<91) do begin
sx:=sin(x);
grad:=(sx*180)/3.14;  { ???? ne uveren v formule* NAShEL v INTERNETE  }
sx2:=sin(x*x);
sx3:=sin(x)*sin(x);
writeln(x:2,'|',grad:7:2,'|',sx:5:2,'|',sx2:5:2,'|',sx3:5:2,'|');
x:=x+10;
end;
 
readln;
end.