Напишите программу в Паскале

Напишите программу в Паскале
Гость
Ответ(ы) на вопрос:
Гость
//название function f(x:real):real; begin if x<0 then f:=x    else if x=0 then f:=sin(x+1)      else f:=cos(2*x); end; begin write (f(readreal('Введите x: '))); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы