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

var   x:real; begin   x:=0;   while x<=2.0001 do begin     Writeln('x=',x:5:2,'   y=',sqr(x)+1:0:4);     x:=x+0.25   end end. Результат выполнения программы: x= 0.00   y=1.0000 x= 0.25   y=1.0625 x= 0.50   y=1.2500 x= 0.75   y=1.5625 x= 1.00   y=2.0000 x= 1.25   y=2.5625 x= 1.50   y=3.2500 x= 1.75   y=4.0625 x= 2.00   y=5.0000