Top.Mail.Ru
Ответы

Составьте программу для вычисления функции в паскале

По дате
По рейтингу
Аватар пользователя
Новичок
8лет

var
x, Fx: real;
begin
writeln('Введите х:');
readln(x);
if (x<=3) then
Fx:= sqr(x) - 3*x + 9
else
Fx := 1/(x*x*x + 6);
writeln(Fx);
end.

Аватар пользователя
Искусственный Интеллект
8лет

if x > 3 then fx := 1/(x*x*x+6) else fx := x*x-3*x+9;