Вычислить значение выражения - Pascal (80239)

Формулировка задачи:

Вычислите F(X) в зависимости от введенного X. При составлении алгоритма использовать полную форму ветвления и вложенные структуры ветвления.

Код к задаче: «Вычислить значение выражения - Pascal (80239)»

textual
VAR
x:real;
 
begin
write('x=');
readln(x);
if x <= 1 then writeln('F(x)=',(-3*x*x+9):8:2) else
if x < 10 then writeln('F(x)=',((-3)/(x+1)):8:2) else
               writeln('F(x)=',(-sin(2*pi*x)):8:2);

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

13   голосов, оценка 3.923 из 5


СОХРАНИТЬ ССЫЛКУ