Помогите пожалуйста! Составить программу ** Паскале. 8 класс. Функции. Даю 30 баллов!

0 голосов
44 просмотров

Помогите пожалуйста! Составить программу на Паскале. 8 класс. Функции. Даю 30 баллов!


image

Информатика (15 баллов) | 44 просмотров
0

Помогите пожалуйста! Составить программу на Паскале. 8 класс. Функции.

Дан 1 ответ
0 голосов
Правильный ответ

Function f(x:real):real;
begin
  if x>0 then f:=x*x-1
  else
    if x=0 then f:=-5
    else f:=x*x*x+4*x-2
end;

var
  x:real;
 
begin
  Read(x);
  Writeln('y=',f(x))
end.

Пример
3.18
y=9.1124

(150k баллов)