Табуляция

[L1fer]

Помогите пожалуста с задачей:

F(x) - табулируемая функция; [A,B] - диапазон изменения аргумента;
n- количество точек; h- шаг табуляции. Результатом является таблица, содержащая три столбца: i - текущая точка расчета, Xi - значение аргумента, Yi - значение функции.

Для расчетов использовать следующие формулы:

h=B-A/n-1; Xi=A+i*h; Yi=F(Xi); i=0,1,2,...,n-1.

Исходные данные:
Y=F(x) = X-3/X^2+2
A=-4
B=4
n - -
h=0.5

[SNUPY]

for i:=0 to round((b-a)/h) do
begin
xi:=a+i*h;
yi:=x1-3/xi/xi+2;
writeln(i,' ',xi,' ',yi);
end;

Вроде так ^_^