4.1 Pascal (задача 5)

Для решения дифференциального уравнения составляем программу на основе алгоритма метода Эйлера. Для этого пользуемся циклом с пред условием while, чтобы работа цикла прекратилась при достижении нужного нам условия.

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

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

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

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

Рис. 14.

Запускаем программу на выполнение Ctrl+F9. Посмотреть результат Alt+F5

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