3.1 Pascal (задача 4)

Циклический процесс, который реализуется до достижения некоторого условия, называется итерационным алгоритмом. В итерационных алгоритмах заданная погрешность используется для проверки модуля разности найденного приближенного и точного значений.

Если точное значение неизвестно, допустимо оценивать разность между соседними итерациями.

Для решения задачи используем три раздела - uses для объявления модулей, const для объявления констант и var для объявления переменных. Основную программу пишем после зарезервированного слова begin. End с точкой на конце означает окончание программы.

Раздел uses: вводим модуль crt - работа с экраном, в программе используем очистку экрана с помощью оператора clrscr.

Раздел const: вводим погрешность вычислений и диапазон.

Раздел var: объявляем переменные вещественного типа, необходимы для реализации задачи.

Теперь после зарезервированного слова begin очищаем экран от предыдущих расчетов, присваиваем начальные значения и в цикле с постусловием выполняем алгоритм указанный выше. После завершения работы цикла выводим полученный ответ на экран с точностью до четырех знаков (рис.10).

Блок-схема

Рис. 10.

Проверяем правильность программного кода - F9, если все правильно, то запускаем программу на выполнение Ctrl+F9. После чего просматриваем результат Alt+F5 (рис.11).

Рис. 11. Результат работы программы