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

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