Вычислите значение функции x^2/x-2 на интервале [-4;0.5] с шагом 0.5.Паскаль

Составим программку вычисления значения функции y по формуле y = x *x / x-2 (x - данное целое число) на промежутке [-4; 0.5] с шагом 0.5 на языке программирования Pascal ABC. Введем обозначения следующих величин: пусть y значение функции, которую надобно вычислить, а х данное число. Так как нам надо вычислить несколько значений функции, то будем использовать в программке цикл с предусловием while. Тогда программка может выглядеть так:

program zadacha;

uses crt;

var x, i, y: real;

begin

x:=-4;

while xlt;=0.5 do

begin

y:=x*x/x-2;

writeln (y=,y);

x:=x+0.5;

end;

end.