Упр.187 ГДЗ Рабочая тетрадь Босова 8 класс (Информатика)

Ниже вариант решения задания из учебника Босова 8 класс, Бином:
187. Напишите программу вычисления значения функции y(x), график которой представлен ниже.
program DD;
var
x: integer;
Y: real;
begin
write(taskВведи x=task);
readln(x);
if (x >= -2) and (x
else y := 4;
write(tasky=task, y)
end.