Question

Написать арифметическое выражение на языке Pascal

Answer 1

var x,y:real;
begin 
readln(x);
y:=(sin(x)/Power(20,x))*sqrt(x);
writeln(y);
end.

Answer 2

Спасибо огромное! А поможете решить ещё одну задачу по информатике? Я сейчас создам вопрос по ней.