Регистрация
Войти
Стать экспертом Правила
Информатика

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

ОТВЕТЫ
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.
135
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам