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

ОТВЕТЫ

Тит
Aug 9, 2019
Var
x,y:real;
begin
Read(x);
if xlt;=3 then y:=x*x-3*x+9
else y:=1/(x*x*x+6);
Write(y)
end.
x,y:real;
begin
Read(x);
if xlt;=3 then y:=x*x-3*x+9
else y:=1/(x*x*x+6);
Write(y)
end.
135
Смежные вопросы: