Опубликовано 10.06.2017 по предмету Информатика от Гость >> <<

ВЫЧИСЛИТЬ ЗНАЧЕНИЕ функции y в заданной точке x
y= -x+1, при x<-1
0, при -1<=x<0
x^2, при x>0

Ответ оставил Гость

Var  x: real;
begin
  read(x);
  if(x < -1) then writeln(-x + 1)
  else if(x >= -1) and (x < 0) then writeln(0)
  else writeln(x * x);
end.