n="justify">
Readln; Кінець програми фіксується службовим словом END, після якого обов'язково ставиться крапка:
END.
Висновок
Проблема підвищення якості обчислень, як невідповідність між бажаним і дійсним, існує і буде існувати надалі. Її рішенням сприятиме розвиток інформаційних технологій, яке полягає як в удосконаленні методів організації інформаційних процесів, так і їх реалізації за допомогою конкретних інструментів - середовищ і мов програмування.
Для вирішення даних нелінійних рівнянь використовувався метод ітерацій. Цей метод відрізняється від інших тим, що в порівнянні з іншими методами, він є одним з найбільш простих методів визначення коренів нелінійних рівнянь.
У процесі створення курсової був розроблений алгоритм вирішення поставленого завдання. За цим алгоритмом на мові Turbo Pascal складена і налагоджена програма. Створена програма може служити органічною частиною вирішення більш?? Помилкових завдань. Аналіз результатів показує, що програма працює правильно і вірно знаходить коріння нелінійних рівнянь.
Список використаних джерел та літератури
. Бахвалов Н. С., Чисельні методи. 4-е вид.- М.: БИНОМ. Лабораторія знань, 2006. - 636 с.: Ил.
. Вержбицький В.М., Чисельні методи (математичний аналіз і звичайні диференціальні рівняння): Учеб. посібник для вузів.- М.: Вища. шк., 2001. - 382 с.: ил.
. Волков Є. А., Чисельні методи: Навчальний посібник. 4-е вид., Стер.- СПб.: Видавництво «Лань», 2007. - 256 с.: Ил.- (Підручники для вузів. Спеціальна література).
4. Калиткин, Н.Н. Чисельні методи. [Електронний ресурс] / М.М. Калиткин.- М.: Питер, 2001. С. 504.
5. Копченова Н. В., Марон І. А., Обчислювальна математика в прикладах і задачах: навчальний посібник. 2-е вид., Стер.- СПб.: Видавництво «Лань», 2008. - 368 с.- (Підручники для вузів. Спеціальна література).
. Лапчик, М.П. Чисельні методи: Учеб. посібник для студ. вузів / М.П.Лапчік, М.І.Рагуліна, Е.К.Хеннер; Под ред. М.П.Лапчіка.- 2-е вид., Стер.- М.: Видавничий центр «Академія», 2005. - 384 с.
Додатки
Додаток 1
Кодова частина.
PROGRAM MetodIteraccii;
VAR, x1, e, a, b: real;, k: integer; f (x: real; a, b: real): real;:=a * ln (x) + b ;; c (x: real; a, b: real): real;:=a * cos (x) + b;; s (x: real; a, b: real): real;:=a * sin ( x) + b;; («1) x=a * ln (x) + b 2) x=a * cos (x) + b 3) x=a * sin (x) + b Виберете функцію:» ); (k); («Введіть a =»); (a); («Введіть b =»); (B); («Введіть наближене значення X =»); (x1); («Введіть точність e =»);
Readln (e);:=0;:=i +1;:=x1; k=1 then x1:=f (x0, a, b); k=2 then x1:= c (x0, a, b); k=3 then x1:=s (x0, a, b); (abs (x1-x0) <= e);
Writeln («Рішення рівняння:»); («Обчислення значення кореня ...», x1: 6:5); («Число ітерацій ....... ....... », i);
Readln;
END.
Додаток 2