Question

Решить на паскале помогите пожалуйста !

Answer 1

Ответ:

begin

 var a,b,x,y:real;

 write('Введите значения a,b,x: '); readln(a,b,x);

 y:=(b>2)? tan(0.57)*log(b-2):sin(x).Sqr+abs((power(e,a)));

 write('y(',b,') = ',y);

end.

Примечание:

В программе использована константа E, обратите на это внимание. Если же Е подразумевает другое число - внесите его, предварительно обозначив другой буквой.