Составить программу вычисления значений функции f(x) на отрезке [a; b] с шагом h. результат представить в виде таблицы f(x)=корень из х*соs^2x

// PascalABC.NET 3.2, сборка 1385 от 14.02.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var a,b,h:real;
  Write('Введите a,b,h: '); Read(a,b,h);
  var n:=Trunc((b-a)/h);
  for var i:=0 to n do begin
    var x:=a+i*h;
    var y:=cos(x)*sqrt(x);
    Writeln(x:6:3,y:15:5)
    end
end.

Пример
Введите a,b,h: 0.2 3.2 0.3
 0.200        0.43830
 0.500        0.62054
 0.800        0.62315
 1.100        0.47574
 1.400        0.20111
 1.700       -0.16799
 2.000       -0.58852
 2.300       -1.01046
 2.600       -1.38169
 2.900       -1.65348
 3.200       -1.78580