Program prog;
var x:real;
begin
writeln((sqrt(10)+1)/(6.25-1.8));
writeln(100*sin(4));
write('x = ');
readln(x);
writeln(100*sin(x));
writeln(2*sin(3));
writeln(sqrt(sqrt(5)+sqrt(6)));
end.
Пример:
0.935343294419861
-75.6802495307928
x = 2
90.9297426825682
0.282240016119734
2.16461491269994