Cоставить программу вычисления значений функций F(x) на отрезке a;b с шагом h. Результат представить в виде таблицы , первый столбец которой - значения аргумента, второй - соответствующие значения функции. F(x)=x^2 *sin^2x +1

Var a,b,h,f,x:real;
begin
write(Введите а и b: );
readln(a,b);
write(Введите h: );
readln(h);
x:=a;
write(x::8);
while x  begin
  write(x:8:2);
  x:=x+h;
  end;
writeln;
write(F(x)::8);
x:=a;
while x  begin
  f:=x*x*sqr(sin(x))+1;
  write(f:8:3);
  x:=x+h;
  end;
end.