- •Краткое введение в язык программирования PascalAbc (материал взят из справки по системе PascalAbc). Общие сведения
- •Структура программы
- •Описание переменных и констант
- •Описание типов
- •Ввод и вывод. Форматы вывода
- •Выражения и операции
- •Задание 1. Вычисление значения выражения
- •Задание 2. Ms Word
- •Задание 3. Решение уравнения методом последовательных приближений
- •Задание 4. Решение уравнения усовершенствованным методом последовательных приближений
- •Задание 5. Решение уравнения методом хорд
- •Задание 6. Решение уравнения методом касательных (метод Ньютона)
- •Задание 7. Решение уравнения комбинированным методом хорд и касательных
- •Задание 8. Решение системы линейных алгебраических уравнений (слау) методом Крамера
Задание 3. Решение уравнения методом последовательных приближений
Суть метода:
привести исходное уравнение к виду .
В первом приближении принять .
Определить значение .
Проверить погрешность: . Если условие не выполнилось, переход к п. 5.
Определить значение .
Проверить погрешность: . Если условие не выполнилось, переход к п. 5.
Метод обладает недостатком: не сходится при .
Порядок выполнения работы:
В MS Excel определить диапазон, в котором находится корень (a..b).
Привести уравнение к виду .
Принять за первое приближение .
Алгоритм должен запрашивать у пользователя значение первого приближения, а точность реализовать в виде константы.
Алгоритм должен проверять сходимость метода. В случае, если условие сходимости не выполняется, необходимо применить другую функцию .
Запрос исходных данных и вывод результатов на экран реализовать в виде процедур.
Функцию реализовать в виде функции.
Задание 4. Решение уравнения усовершенствованным методом последовательных приближений
Суть метода:
привести исходное уравнение к виду .
В первом приближении принять .
Определить значение .
Проверить погрешность: . Если условие не выполняется, переход к п. 5. Если выполняется, выход из алгоритма, искомый корень .
Определить значение , где
;
Проверить погрешность: . Если условие не выполнилось, переход к п. 7. Если выполнилось – выход из алгоритма, искомый корень .
Выполнить переприсвоение ; . Переход к п. 5.
Порядок выполнения работы:
В MS Excel определить диапазон, в котором находится корень (a..b).
Привести уравнение к виду .
Принять за первое приближение .
Алгоритм должен запрашивать у пользователя значение первого приближения, а точность реализовать в виде константы.
Запрос исходных данных и вывод результатов на экран реализовать в виде процедур.
Функцию реализовать в виде функции.
Задание 5. Решение уравнения методом хорд
Суть метода:
Рисунок 1. Графическая интерпретация метода хорд
Пусть x1,x2 − абсциссы концов хорды, y = kx + b − уравнение прямой, содержащей хорду. Найдем коэффициенты k и b из системы уравнений:
.
Вычтем из первого уравнения второе:
f(x1) − f(x2) = k(x1 − x2), затем найдем коэффициенты k и b:
, тогда
.
Уравнение принимает вид:
Таким образом, теперь можем найти первое приближение к корню, полученное методом хорд:
Теперь возьмем координаты x2 и x3 и повторим все проделанные операции, найдя новое приближение к корню. Повторять операцию следует до тех пор, пока не станет меньше или равно заданному значению погрешности.
Итерационная формула метода хорд:
Задание 6. Решение уравнения методом касательных (метод Ньютона)
Рисунок 2. Графическая интерпретация метода касательных
Основная идея метода заключается в следующем: задаётся начальное приближение вблизи предположительного корня, после чего строится касательная к исследуемой функции в точке приближения, для которой находится пересечение с осью абсцисс. Эта точка и берётся в качестве следующего приближения. И так далее, пока не будет достигнута необходимая точность. Общий вид искомого корня сводится к виду: .
Недостатки метода:
если начальное приближение недостаточно близко к искомому корню, метод может не сойтись;
если производная не непрерывна в точке корня, метод расходится в любой окрестности корня;
если в точке корня не существует вторая производная, сходимость метода может заметно снизиться;
если производная в точке корня равна 0, метод может преждевременно прекратить поиск с неверно найденным значением искомого корня.
Порядок выполнения:
В первом приближении принять .
Вычислить значение .
Проверить погрешность: . Если условие не выполняется, переход к п. 5. Если выполняется, выход из алгоритма, искомый корень .
Определить значение , где .
Выполняется проверка . Если проверка прошла, искомый корень . Если не прошла, выполняется переприсвоение , затем переход к п. 3.
Выполнить переприсвоение ; Переход к п. 3.
Функция реализовать в виде функции. Весь алгоритм реализовать в виде процедуры.