Постройте таблицу значений функции y=f(x) для x€[a,b] с шагом h.
Замечание. Для решения задачи использовать вспомогательный метод.
12 задача

// PascalABC.Net 3.0, сборка 1052function f(x:double):double;begin  if x<0 then result:=0  else    if x=1 then result:=1    else result:=sqr(x)+1end;var  a,b,h,x:double;begin  Write('Введите a b h: '); Read(a,b,h);  x:=a;  while x<=(b+1e-10*h) do begin    Writeln('x=',x:10:5,', y=',f(x):10:5);    x:=x+h  endend.Тестовое решение:Введите a b h: 0.3 2.5 0.25x=   0.30000, y=   1.09000x=   0.55000, y=   1.30250x=   0.80000, y=   1.64000x=   1.05000, y=   2.10250x=   1.30000, y=   2.69000x=   1.55000, y=   3.40250x=   1.80000, y=   4.24000x=   2.05000, y=   5.20250x=   2.30000, y=   6.29000