Question

Паскаль

Ввести x, вычислить функцию

Answer 1

Ответ:

program z;

var x,y:real;

begin

write('x = ');

read(x);

if x>14.5 then y:=1+x

else if x<3 then y:=cos(x)

else y:=exp(-x);

write('y = ',y:0:5)

end.