program szinusz; var x, r:real; begin Writeln('K‚rem a szoget fokban: '); readln(x); r:=x*pi/180; writeln('A szog szinusza: ', sin(r):8:2); readln end.