Построение таблиц функций.

[Mary1108]

Помогите пожалуйста написать программу! Надо очень срочно, времени до сдачи осталось совсем мало.
Составить программу вычисления значений функции x-sin(x) на отрезке [A, B] в точках Xi = A + iH, где H = (B - A)/M, M — заданное целое число. Значение шага Н должно вычисляться один раз.
При A=0, B=П\2, M=10.

[ViktorR]

Вот описание функции:

function f(x : real) : real;
begin
   f := x - sin(x);
end;

1. Запрашиваешь и читаешь начальные значения для A, B, M.
Или определяеш значения:

A := 0;
B := pi/2;
M := 10;

2. Определяешь шаг: h := (B-A)/M;
3. Задаешь первую точку для расчета: xi := A;
4. В цикле: while xi <= B do begin
5. Вычисляешь и выводишь значение функции:

writeln('x = ', xi:6:2, 'F = ',f(xi):8:5);

6. Переходишь к следующей точке: xi := xi + h;
7. Конец цикла.

Это просто. Так думаю, что написать полностью не составит труда.

Как-то так, ...

[Mary1108]

Спасибо огромное! Написать полностью все это я смогу! Вы меня спасли)