Помогите пожалуйста 9 класс программирование

Question

Помогите пожалуйста 9 класс программирование

---

Answer 1

//PascalABC.NET (версия 3.1, сборка 1196 от 09.03.2016)
var x,y:real;
begin
  writeln('Введите Х ');
  readln(x);  
  if x<-2 then y:=-2;<br>  if x>2 then y:=2;
  if (x<=2) and (x >=-2) then y:=x;
  writeln('y = ',y);
end.