Составить метод и программку вывода на экран таблицы значений Y:y=x^2+1 для

program zz1;
var x, y:real; // задаем переменные не целого типа
begin
x:=0;
while x lt;= 2 do // организуем цикл, в котором переберем все числа от нуля до 2-ух через 0,25
begin
y:=x * x + 1; // вычисляем значение по заданной формуле
writeln( для , x, вычисленное значение = , y); // выводим ответ в столбец
x:=x + 0.25; // увеличиваем х на 0,25
end;
end.