Напишите программу вычисления значения функции у(х), график которой представлен ниже. (Рисунок)

var x, y : real...if(=2) then y:=4if ((x>-2) and (x