Вычисление значения функции F(x) на отрезке [a, b] с шагом h - Pascal ABC

Узнай цену своей работы

Формулировка задачи:

Составить программу для вычисления значения функции F(x) на отрезке [a,b] с шагом h. Произвести проверку деления на ноль если это необходимо. Результат представить в виде таблицы, первый столбец которой — значения аргумента, второй — соответствующие значения функции. для функции:

Но без использования консоли в программе!

Решение задачи: «Вычисление значения функции F(x) на отрезке [a, b] с шагом h»

textual
Листинг программы
const
    line = '----------------------------';
    EPS = 0.001;
var
    a, b, h: Single;
begin
    Write('a='); ReadLn(a);
    repeat
        Write('b='); ReadLn(b);
    until (b > a);
    Write('h='); ReadLn(h);
    WriteLn;
    WriteLn(line);
    WriteLn('|     x     |     F(x)     |');
    WriteLn(line);
    while ((a < b) Or (Abs(a - b) < EPS)) do
    begin
        Write('| ', a:9:2, ' | ');
        if (a < 0)
        then
            WriteLn('complex numb |')
        else
            WriteLn((Sqrt(a) * Sqr(Sin(a))):12:2, ' |');
        a := a + h;
    end;
    WriteLn(line);
end.

Объяснение кода листинга программы

  1. В первой строке заданы константы и переменные.
  2. Затем происходит чтение значений переменных a, b и h с помощью функции ReadLn.
  3. Далее идет проверка, что значение переменной b больше значения переменной a.
  4. Затем происходит чтение значения переменной h.
  5. Выводится строка с метками для отображения результатов.
  6. Запускается цикл while, который выполняется до тех пор, пока либо a меньше b, либо расстояние между ними меньше EPS.
  7. Внутри цикла выводится значение переменной a с меткой | a | и, если a меньше нуля, выводится complex numb |.
  8. Значение переменной a увеличивается на h.
  9. Выводится значение переменной a с меткой | a |, если оно изменилось.
  10. Цикл while повторяется, пока выполняются условия.
  11. Выводится строка с метками для отображения результатов.
  12. Выводится строка с метками для отображения результатов.
  13. Конец программы.

Оцени полезность:

6   голосов , оценка 3.833 из 5
Похожие ответы