Напечатать таблицу значений функции y= 2x^3 - 0,5x+5
Решите плез, надо срочно.
PascalABC

var x,y,a,b,h:real; i:integer;beginreadln(a,b,h);x:=a-h;for i:=1 to round((b-a)/h)+1 do begin x:=x+h; y:=2*x*x*x-0.5*x+5; writeln(x:4:1,' ',y:6:3); end;end.Пример:-2 2 0.5-2.0 -10.000-1.5 -1.000-1.0 3.500-0.5 5.000 0.0 5.000 0.5 5.000 1.0 6.500 1.5 11.000 2.0 20.000