Курсовая работа: Метод Крамера

Курсовая работа: Метод Крамера




🛑 👉🏻👉🏻👉🏻 ИНФОРМАЦИЯ ДОСТУПНА ЗДЕСЬ ЖМИТЕ 👈🏻👈🏻👈🏻




























































2.3 Контрольний приклад та результат машинного експерименту
Обчислювальну техніку останніми роками широко застосовують у всіх сферах діяльності людини. Вона стала каталізатором науково-технічного прогресу. Бурхливий розвиток ЕОМ сприяв широкому процесу математизації науки, техніки і господарства в цілому. Саме розробка і застосування математичних методів розв’язування прикладних задач на базі ЕОМ є предметом сучасної математики.
Математика – одна з найдавніших наук – виникла з практичних потреб людини. Розвиток математики сприяв загальному науково-технічному прогресу цивілізації, а потреби природознавства, техніки і практичної діяльності людей становили перед математикою нові задачі і стимулювали її розвиток.
Розвиток обчислювальної математики тісно пов’язаний з розвитком програмування, яке йде шляхом спрощення способів спілкування людини з комп’ютером. На сучасному етапі розвитку виникають мови програмування наближені до природних, розвиваються проблемно орієнтовані мови програмування, засоби візуального програмування, створюються пакети прикладних програм. Виникають і інтенсивно розвиваються структурне програмування і спеціалізовані мови для розробки структурованих програм.
Завдання на курсовий проект передбачає розробку програмного забезпечення для розв’язку задачі математичного характеру. Для її реалізації я вибрав мову Turbo Pascal 7.0.
Паскаль – гнучка і розвиненута в відношенні типів даних мова. Привабливі його рекурсивні можливості, а також підтримка технології об’ектно-орієнтовного програмування.
Розробником ціїє мови був швейцарський вчений Ніклаус Вірт, який створив Паскал ще в 70-х роках. Турбо Паскаль фірми Borland являється розширенням стандарта Мови і має також інтегроване середовище, яке набагато прискорює і полегшує процес розробки програм. Цей прграмний продукт пройшов через 6 версій, після чого і появився Турбо Паскаль 7.0.
Головні особливості мови Turbo Pascal:
Можливість обробки стрічкових та структурних даних.
Достатній набір операторів керування розгалуженнями та циклами.
Добре розвинутий апарат підпрограм.
Зручні конструкції роботи з файлами.
Великі можливості керування всіма ресурсами комп’ютера.
Різноманітні стикування з мовою Асемблера.
Підтримка ідей об’єктно-орієнтовного програмування.
Курсовий проект складається зі вступу, двох розділів, висновків, списку використаної літератури та додатків. Текст пояснювальної записки набрано та роздруковано з використанням текстового редактора Word.
Нехай дано систему п лінійних алгебраїчних рівнянь з п змінними
Систему (1) можна записати у вигляді одного матричного рівняння
матриця коефіцієнтів (індекс і вказує рівняння, якому належить коефіцієнт, а індекс j – змінну, при якій він стоїть),
відповідно стовпець вільних членів і стовпець змінних.
Упорядкована сукупність п чисел , яка, будучи підставленою в систему (1) замість , перетворює всі рівняння в правильні числові рівності, називається розв’язком системи (1)
то вона має єдиний розв’язок. Його можна обчислити за формулами Крамера.
де матрицю дістають з матриці А, замінивши її k-й стовпець стовпцем вільних членів.
Методи розв’язування систем лінійних рівнянь можна поділити на дві групи: точні й ітераційні.
Точними називають такі методи, які дають змогу знайти точний розв’язок системи (1) за допомогою виконання скінченої кількості арифметичних операцій у припущенні, що всі обчислення виконуються точно (без округлень), а коефіцієнти системи і вільні члени – точні числа. Але на практиці всі обчислення виконуються з обмеженою кількістю десяткових розрядів, а ірраціональні коефіцієнти і вільні члени, якщо такі є, замінюються раціональними числами. Тому в процесі обчислення вдаються до округлень, а це означає, що розв’язки, які обчислюються за точними методами, фактично є наближеними числами з певними похибками (похибками округлень). До точних належать метод Гаусса, метод квадратних коренів, правило Крамера тощо.
Інтераційними називають такі методи, які дають змогу знайти наближений розв’язок системи (1) із заздалегідь вказаною точністю шляхом виконання скінченої кількості арифметичних операцій, хоч самі обчислення можуть проводитись і без округлень, а коефіцієнти і вільні члени системи бути точними числами. Точний розв’язок системи (1) за допомогою ітераційних методів може знайти тільки теоретично як границю збіжного нескінченного процесу. Розв’язуючи системи рівнянь ітераційними методами, крім похибок округлення, треба враховувати похибку методу. До ітераційних належать метод ітерації, метод Зейделя тощо.
В завданні на курсовий проект передбачено розробку програмного забезпечення для розв’язування системи лінійних рівнянь за формулами Крамера.
Програма повинна забезпечувати виконання таких операцій:
ввід коефіцієнтів системи рівнянь та вільних членів;
обчислення визначників системи та знаходження розв’язків системи;
вивід систем рівнянь та її розв’язків на екран.
Для реалізації поставленого завдання в середовищі Turbo Pascal 7.0 розроблено програму KRAMER.PAS. Перелічені вище операції реалізуються в програмі за допомогою процедур.
Розглянемо систему трьох лінійних рівнянь з трьома невідомими:
Систему (1) можна також записати так:
Тут - деякі задані числа, а x, y, z – невідомі, які потрібно знайти.
Як нам вже відомо, тройка чисел називаються рішенням системи (1), якщо при підстановці їх в рівняння системи замість x, y і z вийдуть вірні числові рівності.
Розглянемо спочатку випадок, коли всі коефіцієнти рівнянь системи (1) рівні нулю:
В цьому випадку, якщо всі вільні члени рівнянь системи рівні нулю:
то очевидно, люба тройка чисел (x; y; z) являється розв’язком цієї системи. Якщо ж вільні члени рівнянь рівні нулю, то система не має рішень.
Розглянемо тепер більш цікавий випадок, коли не всі коефіцієнти рівнянь системи (1) рівні нулю. Нехай, наприклад, . Тоді система еквівалентна наступній:
Останнє рівняння цієї системи помножимо на і вилучаємо почленно із першого рівняння, в результаті получимо рівняння
Аналогічно, помножив останнє рівняння на і вилучаючи почленно із другого рівняння будемо мати
у якої перше рівняння виходить із (2), а друге із (3) множенням на , еквівалентна системі (1).
Таким чином, якщо 0, то дослідження системи (1) зводиться до дослідження системи двох лінійних рівнянь з двома невідомими:
Розглянемо спочатку випадок, коли всі коефіцієнти рівнянь системи (5) дорівнюють нулю. Тоді, якщо вільні члени рівнянь системи (5) рівні нулю, то люба пара чисел (x;y) являється рішенням системи (5) і, отже, люба трійка чисел (x;y;z), де
являється рішенням системи (1). Якщо ж хоча б у одного із рівнянь системи (5) вільний член не дорівнює нулю, то система (5), то і система (1) не мають рішень.
Розглянемо випадок, коли не всі коефіцієнти рівнянь системи (5) рівні нулю. Нехай, наприклад,
Перше рівняння системи (5) помножимо на , друге – на - і додамо; після очевидних перетворень отримаємо рівняння
Таким чином, якщо , то система (5) еквівалентна системі
Якщо , то очевидно, люба пара чисел (x;y), де
Із (6) і останнього рівняння системи (4) знаходимо
Аналогічно, якщо і , то люба трійка чисел (x;y;z), де , а y та z знаходяться в формулах (6) і (7), являється рішенням системи (1).
Якщо , а , то система (5), а також і система (1) не мають розв’язків.
Підставивши це значення х в друге рівняння системи (5), знайдемо
Підставивши отримані значення x і y в третє рівняння системи (4), отримаємо
Випливає, якщо , то система (1) має одне рішення, яке знаходиться за формулами:
Ці формули і називаються формулами Крамера.
Представлена програма реалізується програмою Kramer. Написана на мові Паскаль. Вона включає в себе ряд процедур, які забезпечують виконання вводу, обчислень та виводу на екран розв’язку задачі.
Для зменшення обсягу тіла програми використовується модуль zast.tpu (лістінг модуля додається до проекту), в якому знаходяться всі головні компоненти, які використовують процедури (інтерфейси, описи тощо).
Перед описом процедур здійснюється опис міток (розділ міток) і змінних (розділ змінних). Потім (після опису процедур) іде розділ операторів (тіло програми), що заключається в операторні дужки, тобто Begin…End. В ньому вказується послідовність дій, що повинні використовуватись ЕОМ.
Запуск програми здійснюється таким чином:
Спосіб. З середовища будь-якої операційної оболонки шляхом запуску Kramer.exe (попередньо програма має бути відкомпільована з опцією Destination Memory).
Спосіб. З головного меню інтегрованого середовища Turbo Pascal шляхом вибору опції Run (програма попередньо повинна бути завантажена в ОП – File, Open, Kramer.pas).
Після запуску програми будь-яким методом вона видасть на екран головне меню, яке пропонує одну із опцій:
При виборі певного пункту активізується відповідна процедура. Завершення роботи програми і повернення в середовище системи програмування Turbo Pascal здійснюється при виборі пункту меню “Вихід”. Програма здійснює обчислення системи рівнянь методом Крамера та виводить результати на екран дисплею.
В програмі використовуються такі процедури:
Vvid – призначена для вводу значень.
Vyvid – призначена для обчислень та виводу результатів.
{014}-{025} ввід лівої і правої частини рівняння в відповідні клітинки
підключення графічного режиму оператором ini
поки змінна q не буде дорівнювати *
якщо натиснута будь-яка клавіша то виконуються наступні дії
читання натиснутої клавіші і присвоєння їй змінній q
початок циклу по розпізнані натиснутої клавіші
стрілочка “вниз” то якщо rob>4 тоді rob=1,якщо rob<4 тоді rob=rob+1
стрілочка “вверх” то якщо rob>1 тоді rob=rob-1,якщо rob<1 тоді rob=4
клавіша “Ентер” тоді: розпізнання змінної rob якщо rob=1 то на екран з модуля zas виводиться процедура about, яка виводить інформацію про програму, а також здійснюється перехід на мітку pt
якщо змінна rob=2 тоді то на екран з модуля zas виводиться процедура vvid в якій описуються всі змінні для процедури vvid програми, а також вивід рамки для вводу змінних. Перехід на мітку pt
якщо змінна rob=3 тоді то на екран з модуля zas виводиться процедура vyvid в якій описуються всі змінні для процедури vyviid програми, а також вивід рамки для вводу змінних. Перехід на мітку pt
якщо змінна rob=3 то здійснюється вихід в систему
кінець циклу визначення натиснутої клавіші
1 тоді очистка екрану і виконаня процедури punkt1
2 тоді очистка екрану і виконаня процедури punkt2
3 тоді очистка екрану і виконаня процедури punkt3
4 тоді очистка екрану і виконаня процедури punkt4
кінець циклу “якщо натиснута клавіша”
кінець циклу “поки q не буде дорівнювати *”
Процедура ini використовується для підключення графічних модулів, а також графічного режиму.
Процедура about дає користувачу інформацію про призначення програми та розробника.
Процедура clear повертає пункти меню в початковий вигляд.
Процедури punkt1, punkt2, punct3, punct4 маркірують відповідно пункти меню у другий колір для вигляду переходу курсору по пунктам меню.
Процедури vvid та vyvid забезпечують вивід рамок для вводу та виводу даних в програму/з прорами.
Процедура zas виводить малюнок головного меню.
2.3 Контрольний приклад та результат машинного експерименту
Випробування будь-якої системи є найбільш відповідальний та пов’язаний з найбільшими труднощами і найбільшими втратами часу.
Відладка і тестування – найважливіші етапи життєвого циклу програм. Не можна зробити висновки про правильність виконання програми тільки на підставі того, що вона відкомпільована і видає якісь числові дані, адже в ній все ж ще можуть міститись логічні помилки. Тому необхідно здійснити “ручну” перевірку машинних результатів.
Отже задача: Розв’язати систему лінійних рівнянь з трьома невідомими за допомогою формул Крамера
Так, як 0, то система має одне рішення.
Підставивши знайдені визначники в формули Крамера будемо мати:
Зваживши на велику вартість готових формових пакетів, надзвичайно важливо вміти самостійно складати програми для роз’язку окремих типів задач, хоча створення програмного забезпечення зараз являється не областю для програмістів – одинаків, а високотехнічною структурою. Більшість комерційних програмних продуктів являються дуже складними витворами та створені колективами, в які часто входять десятки висококваліфікованих програмістів. Значно більше людей в фірмах – розробниках програмного забезпечення зайнятих організацією продажу, маркетингом, кур’єрством, консультаційним обслуговуванням покупців і т.д. Найбільш відомою є фірма Microsoft, яка займається розробкою програмного забезпечення як для користувацьких програм так і для апаратного програмування.
В даному курсовому проекті розроблено та описано програму отримання результатів розв’язку системи лінійних рівнянь методом Крамера. Програма відладжена з використанням набору текстових даних. Контрольний приклад розроблений вручну для перевірки роботоздатності програми та результат машинного експерименту повністю співпали. Тому можна використовувати дану програму на практиці.
Вибір алгоритмічної мови Паскаль для реалізації поставленої задачі повністю виправдав себе. В процесі розробки програмного забезпечення зроблено висновок про можливість оформлення функції обчислення визначника другого порядку у вигляді програмного модуля, оскільки задача обчислення визначників вищих порядків дуже часто зустрічається при розв’язуванні задач матричної алгебри і може бути зведена до багатократного обчислення визначника другого порядку.
Turbo pascal(учебник) / С.А. Немнюгин – СПБ: Издательство “Питер”, 2000.
М.Я. Ляшенко, М.С. Головань. Чисельні методи. К.:”Либідь”, 1996 – 285 с.
Математика для техникумов – Алгебра и начала анализа.
(*******************************************************)
(* Copyrigth (c) 2003, S.Filonenko *)
(* Дата створення: беpезень 2003 *)
(* Використовуванi процедури i функцii: *)
(********************************************************)
x1,x2,x3,x4,x5,x6,x7,x8,x9,a,b,c:integer;
d:=x1*x5*x9+x2*x6*x7+x4*x8*x3-x3*x5*x7-x2*x4*x9-x8*x6*x1;
dx:=a*x5*x9+x2*x6*c+b*x8*x3-x3*x5*c-x2*b*x9-x8*x6*a;
dy:=x1*b*x9+a*x6*x7+x4*c*x3-x3*b*x7-a*x4*x9-c*x6*x1;
dz:=x1*x5*c+x2*b*x7+x4*x8*a-a*x5*x7-x2*x4*c-x8*b*x1;
#80: begin if rob>4 then rob:=1;if rob<4 then rob:=rob+1;end;
#72: begin if rob>1 then rob:=rob-1;if rob<1 then rob:=4; end;
#13: begin if rob=1 then begin about;goto pt;end;
if rob=2 then begin vvid; goto pt; end;
if rob=3 then begin vyvid; goto pt; end;

Название: Метод Крамера
Раздел: Рефераты по информатике, программированию
Тип: курсовая работа
Добавлен 02:23:18 23 апреля 2010 Похожие работы
Просмотров: 687
Комментариев: 15
Оценило: 3 человек
Средний балл: 5
Оценка: неизвестно   Скачать

Срочная помощь учащимся в написании различных работ. Бесплатные корректировки! Круглосуточная поддержка! Узнай стоимость твоей работы на сайте 64362.ru
Привет студентам) если возникают трудности с любой работой (от реферата и контрольных до диплома), можете обратиться на FAST-REFERAT.RU , я там обычно заказываю, все качественно и в срок) в любом случае попробуйте, за спрос денег не берут)
Да, но только в случае крайней необходимости.

Курсовая работа: Метод Крамера
Дипломная работа: Управление персоналом организации, находящимися в кризисом состоянии. Скачать бесплатно и без регистрации
Реферат: Лекции по маркетинговым исследованиям
Реферат по теме Способы защиты земляного полотна от обледенения и промерзания
Реферат: Статистичне вивчення урожайності зернових
Реферат На Тему Зародження Порівняльно-Історичного Мовознавства
Поиск Литературы Для Реферата
Курсовая Работа Государственный Бюджет Кыргызской Республики
Язык Современной Молодежи Сочинение Рассуждение
Практическая Работа Экосистема
Реферат: Філософія Єразма Ротердамского
Реферат: Список использованной литературы 8
Дипломная работа по теме Аналіз вокальних методик другої половини ХХ століття: на прикаді методичного досвіду І. Прянішникова, В. Луканіна, В. Самарцева
Курсовая работа по теме Финансы предприятий и социальная ответственность бизнеса
Реферат Русское Искусство
Қазақ Мәдениетінің Космосы Эссе
Курсовая Работа 5 Баллов
Реферат На Тему Северная Европа В Системе Международных Отношений В Xxi В.
Реферат по теме Защита прав акционеров на имущество в виде акций, утраченных помимо их воли
Реферат: Модернізм в літературі. В. Маяковський
Билеты: Задачи по метрологии и квалиметрии
Реферат: Форма правления в России, государственное устройство и политический режим
Реферат: Государственная поддержка инновационной деятельности
Реферат: Анализ финансово-хозяйственной деятельности предприятия

Report Page