Курсовая работа: Разработка программы решения системы линейных уравнений

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

Дальневосточная академия государственной службы
Факультет государственного и муниципального управления
Разработка программы решения системы линейных уравнений

1. Описание математических методов решения систем линейных уравнений
1.3 Вычисление определителей второго и третьего порядка
Список используемых источников и литературы
Последние десятилетия характеризуются бурным развитием вычислительной техники. Расширяются области применения вычислительных машин и совершенствуются методы их использования. Созданы универсальные языки программирования и разработаны мощные операционные системы.
Системы линейных уравнений появляются почти в каждой области прикладной математики. В некоторых случаях эти системы уравнений непосредственно составляют ту задачу, которую необходимо решать, в других случаях задача сводится к такой системе.
Чтобы быстро справится с решением системы линейных уравнений, можно воспользоваться средствами вычислительной техники - составить программу на языке программирования.
Идея метода Гаусса состоит в последовательном исключении неизвестных. Алгоритм решения системы уравнений этим методом проследим на примере.
Выбирается ведущее уравнение с коэффициентом при х 1
, равным 1. В нашем примере ведущим уравнением будет второе. Систему лучше переписать, поставив это уравнение на первое место:
Умножаем первое уравнение на 6 и вычитаем из полученного второе, чтобы исключить из второго неизвестное х 1
. Первое уравнение записываем, а на место второго - результат вычитания.
Затем первое уравнение умножим на 3 и складываем с третьим уравнением. Тогда получаем систему
первое уравнение переписываем без изменения, а второе умножаем на 7 и вычитаем из него третье уравнение, умноженное на 15, чтобы избавиться от х 2
в третьем уравнении. При этом второе записываем без изменения, на месте третьего - результат вычитания. Тогда
Из третьего следует х 3
=-3, подставим его во второе, получим х 2
= - 2. Далее подставим найденные х 2
и х 3
в первое уравнение, получим х 1
= 1.
Решение системы: х 1
= 1, х 2
= - 2, х 3
= - 3.
Примечание: если система уравнений не содержит уравнения с коэффициентом 1 при х 1
, тогда исключение х 1
из второго и третьего достигается умножением сначала первого на коэффициент второго, а второго на коэффициент первого. Затем умножаем первое на коэффициент третьего, а третье на коэффициент первого. Таким образом при вычитании исключаем х 1
.
Запишем систему линейных 3 уравнений с 3 неизвестными
Составим матрицу из коэффициентов при неизвестных
Введем в рассмотрение матрицы - столбцы для неизвестных и свободных членов:
Тогда систему (2) можно переписать в матричной форме
Умножив это уравнение на слева, получим , откуда = или
Следовательно, матрица - решение Х
находится как произведение на В
.
Пример 2. Решить систему уравнений матричным методом
∆=-1, значит, существует обратная матрица .
Матрица - столбец из свободных членов:
Откуда следует, х 1
= 1; х 2
= 0; х 3
= 2.
Число ( а
11
а
22
- а
12
а
21
) называется определителем второго порядка и обозначается символом
Определитель второго порядка содержит две строки и два столбца. Числа а
11
, а
12
, а
21
, а
22
называются элементами определителя. Диагональ определителя, на которой расположены числа а
11
, а
22
- главная, а элементы а
12
, а
21
составляют побочную диагональ.
Определитель 3-го порядка содержит три строки и три столбца:
Для вычисления определителя третьего порядка существует несколько способов.
Рассмотрим метод вычисления определителя разложением по элементам первой строки.
Введем понятие минора и алгебраического дополнения.
Минором некоторого элемента определителя называется определитель, полученный из данного вычеркиванием той строки и того столбца в которых этот элемент расположен. Обозначается М ij (
i - номер строки, j - номер столбца).
Например, минором элемента а 12
является определитель
Алгебраическим дополнением данного элемента определителя называется его минор, умноженный на (-1) i+
j
. Алгебраические дополнения обозначаются буквами А ij ,

и тогда А y
= (-1) i+
j
M y
.
Так же можно разложить определитель по любой строке или столбцу.
Изложенный метод применим к вычислению определителей 4-го и т.д. порядков.
Пример3. Вычислить определитель разложением по элементам первой строки
М 11
получили, вычеркнув первую строку и первый столбец.
А 12
= (-1) 1+2
. М 12
= - = - (8+3) = - 11.
М 12
получили, вычеркнув первую строку и второй столбец.
А 13
= (-1) 1+3
. М 13
= = 2-3 = - 1.
М 13
получили, вычеркнув первую строку и третий столбец.
Язык Паскаль, начиная с момента своего создания Н. Виртом в 1971г., играет особую роль м в практическом программировании, и в его обучении. С непревзойденной четкостью в нем реализованы принципы структурного программирования. Трансляторы для программ, написанных на Паскале, разработаны для различных компьютеров и в настоящее время имеют множество разновидностей. Они являются компиляторами, обрабатывающими разработанные программистами тексты программ.
Существует много версий языка Паскаль. Различия между ними порой весьма велики. Так, базовая версия Вирта имеет многократно меньше возможностей, чем версия Турбо-Паскаль 7.0. (первая, фактически - язык для обучения будущих программистов, а вторая - орудие профессиональных разработчиков прикладного программного обеспечения) Тем не менее, это версии одного языка.
Любая Паскаль - программа является текстовым файлом с собственным именем и с расширением. pas. Паскаль - программа имеет вид последовательности символов латинских и русских букв, арабских цифр, знаков операций, скобок, знаков препинания и некоторых дополнительных символов. В нем можно выделить описания данных и операторы, описывающие действия, которые надо выполнить машине над этими данными.
Схематически программа представляется в виде последовательности восьми разделов:
описание внешних модулей, процедур и функций;
Каждый раздел начинается со служебного слова, назначение которого зафиксировано в Паскале так, что его нельзя употреблять для других целей. Так например, описание заголовка начинается со служебного слова program, описание констант -const, описание переменных - var, раздел операторов начинается с begin. Программа заканчивается служебным словом end, после которого ставится точка. Описания величин и операторы друг от друга отделяются знаком "точка с запятой".
Для обозначения величин используются имена. Они состоят из латинских букв и цифр, причем первым символом должна быть буква.
Постоянные величины (константы) чаще всего бывают числовыми или символьными. Значения символьных констант заключаются в апострофы.
Постоянные величины описываются в разделе констант по схеме:
Данные, обрабатываемые программой, могут быть различных типов (числовые, символьные, строки, массивы и т.д.). Тип определяет область допустимых значений, а также операции и функции, применяемые к величинам этого типа. В Паскале имеется несколько встроенных простых типов со стандартными именами.
Группа типов, значения каждого из которых можно перечислить в некотором списке - скалярные типы. Для них определен порядковая функция ord (x) - номер значения х в списке; функция pred (x) -значение в списке, предшествующее х, и succ (x) - значение в списке, следующее за х.
Упорядоченный тип - это тип, значения которого упорядочены в обычном смысле.
Переменные описываются в раздел описания переменных по схеме:
Var <список имен переменных>: <тип>
Имена в списке разделяются запятой. В этом разделе может быть описано несколько переменных разного типа, например:
Var a,b,c,: real; k, i: integer; p: Boolean;
Над целыми величинами (тип integer) определены арифметические операции: * (умножение), div (деление нацело), mod (вычисление остатка от деления), +, - (сложение и вычитание); операции перечислены в порядке старшинства. Целый результат дают некоторые стандартные функции (аргумент заключается в круглые скобки):
целая часть вещественной величины х;
целое число, полученное из вещественного ч по правилу округления;
случайное целое число из интервала от 0 до х
Над вещественными величинами определены операции: *, +, -, /, а также стандартные функции, при вещественном или целом аргументе: abs (x), sqr (x), sin (x), cos (x), ln (x), sqrt (x) - квадратный корень из х, int (x) - целая часть из х, random - случайное число от 0 до 1. Указанные операции и функции дают вещественный результат.
Множество всех символов образуют символьные величины (тип char), которые являются упорядоченными.
Выражения - это конструкции, задающие правила вычисления значений переменных. В общем случае выражения строятся из переменных, констант, функций с помощью операций и скобок.
Эта роль выражения отражена в основном операторе языка - операторе присваивания. Он имеет следующий вид:
Тип переменной и тип выражения должны быть согласованы (величины принадлежат к одному и тому же типу).
В Паскале можно вводить с клавиатуры числовые и символьные данные. Имеются две встроенные процедуры (подпрограммы) ввода:
Процедура readln отличается от read только тем, что при завершении ввода курсор перемещается в начало строки.
Программа на Паскале может выводить на экран или на принтер значения числовых или символьных выражений. Имеются две процедуры вывода на экран:
Процедура write (x1,x2,x3,…xn) печатает на экран значения выражения из списка х1, х2,…хn. Для вывода на принтер используются те же процедуры с добавлением служебного слова lst перед списком выражений:
Пример: write (lst,’ нет решений‘);
Паскаль - это язык структурного программирования. Это значит, что программа должна выражать свои мысли очень дисциплинированно, с использованием малого числа четко оговоренных конструкций, используя как чередование их, так и вложения друг в друга. Не рекомендуется (хотя и возможно) использовать оператор перехода goto.
Реализация последовательности действий (т.е. структуры следования) выполняется с помощью составного оператора:
Begin <последовательность операторов> end
Раздел операторов в программе всегда является составным оператором. Служебные слова begin и end часто называют операторными скобками.
Для реализации развилки в Паскале предусмотрены два оператора: условный оператор и оператор варианта (выбора). Они предназначены для выделения из составляющих их операторов одного, который и выполняется.
Структура и действие условного оператора таковы:
Условный оператор может быть неполным, т.е. не содержать часть “else <оператор 2>". В этом случае, если значение логического выражения равно false, условный оператор не вызывает никаких действий.
Оператор варианта имеет следующую форму:
Выражение, стоящее между служебными словами case и of, должно иметь значение ординального типа. Любой список констант может состоять из одной константы.
Оператор варианта вычисляет значение выражения, записанного после case. Если его значение совпадает с одной из констант в некотором списке, то выполняется оператор, стоящий после этого списка. Если значение выражения не совпало ни с одной константой во всех вариантах, то оператор варианта ничего не делает.
Для реализации циклов в Паскале имеются три оператора. Если число повторений известно заранее, то удобно воспользоваться оператором цикла с параметром. В других случаях следует использовать операторы цикла с предусловием (цикл "пока") или с постусловием (цикл "до").
Цикл с предусловием является наиболее мощным в Паскале. Другие операторы цикла можно выразить через него. Его форма такова:
While < логическое выражение> do <оператор >
Действие: вычисляется значение логического выражения. Если оно равно true, то выполняется оператор, после чего снова вычисляется значение логического выражения, в противном случае действие заканчивается.
Оператор цикла с постусловием имеет форму:
Repeat <последовательность операторов >
Действие: выполняется последовательность операторов. Далее вычисляется значение логического выражения. Если оно равно true, то действие заканчивается, в противном случае снова выполняется последовательность операторов цикла и т.д.
Оператор цикла с параметром предусматривает повторное выполнение некоторого оператора с одновременным изменением по правилу арифметической прогрессии значения управляющей переменной (параметра) этого цикла. Оператор цикла с параметром имеет две формы.
For < параметр>: = < выражение 1 > to < выражение 2 > do < оператор>
Параметр, выражение 1, выражение 2 должны быть одного ординального типа. Параметр в этом цикле возрастает. Действие эквивалентно действию следующего составного оператора:
while < параметр> <= < выражение 2> do
Если в этом описании отношение <= заменить на >=, а функцию succ на pred, то параметр в цикле будет убывать, в этом случае цикл с параметром принимает форму 2.
For < параметр>: = < выражение 1 > downto < выражение 2 > do < оператор>
В Паскале кроме простых типов данных: real, integer, boolean, byte, char, программист по своему желанию может определить новый тип путем перечисления его элементов - перечисляемый тип, который относится к простым ординальным типам.
Описание перечисляемого типа выполняется по схеме:
Например, type operator = (plus, minus, multi, divide);
Интервальный тип - это подмножество другого уже определенного ординального типа, называемого базовым. Интервал можно задать в разделе типов указанием наименьшего и наибольшего значений, входящих в него и разделяющихся двумя последовательными точками, например:
Type days = (mon, tue, wed, thu, fri, sat, sun);
Операции и функции - те же, что и для базового типа. Использование интервальных типов в программе позволяет экономить память и проводить во время выполнения программы контроль присваивания.
Естественно и часто очень удобно группировать однотипные данные в последовательности - массивы, строки символов, объединять разнотипные данные в одном и том же объекте в виде записей. Значительное удобство представляются пользователю в Паскале при организации однотипных величин в виде множества с соответствующим набором операций: объединения, пересечения и т.д. Последовательность однотипных величин переменной длины можно представить в Паскале в виде файла данных и хранить на внешних носителях, используя его в разных программах.
Массив -это последовательность, состоящая из фиксированного числа однотипных элементов. Все элементы массива имеют общее имя и различаются индексами. Индексы можно вычислять, их тип должен быть ординальным. В описании массива используются служебные слова array и of. В описании массива указывается тип его элементов и типы их индексов.
В Паскале подпрограммы называются процедурами и функциями и описываются в разделе с тем же названием.
Все имена, описанные в программе до процедуры, действуют во всей программе и в любой ее подпрограмме. Они называются глобальными, в отличии от локальных имен, описанных в процедуре и действующих лишь в ней.
Данные для обработки могут передаваться процедуре через глобальные имена или через аргументы процедуры. В процедуре каждый аргумент имеет свое имя - формальный параметр, описываемый в заголовке процедуры по схеме
Procedure < имя > (<список формальных параметров >)
Описание формальных параметров может иметь вид
<список имен >: < тип> или var < список имен>: < тип>
Оператор вызова процедуры имеет вид
< имя процедуры> (< список выражений>);
Указанные выражения называются фактическими параметрами. Их список должен точно соответствовать списку описаний формальных параметров процедуры. Во время вызова процедуры каждому параметру-значению присваивается значение соответствующего фактического параметра и поэтому их используют для передачи входных данных. Параметры - переменные используются для представления результатов процедуры.
Функция - это подпрограмма, определяющая единственное скалярное, вещественное или строковое значение. Отличия подпрограммы - функции от процедуры:
заголовок функции начинается со служебного слова function и заканчивается указанием типа значения функции:
function < имя> (список описаний формальных параметров): < тип>;
раздел операторов функции должен содержать хотя бы один оператор присваивания имени функции;
обращение к функции - не оператор, а выражение вида:
< имя функции> (< список фактических параметров>)
Для решения систем линейных уравнений методом Гаусса и матричным методом создана программа на языке Паскаль. Программа запрашивает исходные данные (рис.1):
матрицу коэффициентов при неизвестных х;
способ решения системы линейных уравнений - вариант 1 или 2.
В зависимости от выбранного вариант в программе происходит решение системы уравнений методом Гаусса (рис.2) или матричным методом (рис.3) с выдачей на экран результатов:
Рисунок 3.2 Результаты расчетов системы линейных уравнений методом Гаусса.
Рисунок 3.3 Результаты расчетов системы линейных уравнений матричным методом.
Программа состоит из 7 подпрограмм - 6 процедур и одной функции:
процедура Gauss обеспечивает решение системы линейных уравнений по методу Гаусса;
процедура matrica обеспечивает решение системы линейных уравнений матричным методом;
процедура PrintMatr2 предназначена для выдачи на экран исходной и обратной матрицы;
процедура MultString предназначена для умножения строк матрицы на число r;
процедура AddStrings прибавляет к i1-ой строке матрицы i2-ю, умноженную на число r;
процедура MultMatr предназначена для умножения матриц.
Функция Sign используется для изменения знака на противоположный при вычислении обратной матрицы.
Программа настроена на решение системы 3-х линейных уравнений с тремя неизвестными. Чтобы решить систему из 2-х уравнений с 2-мя неизвестными необходимо в программе изменить значение константы N с N=3 на N =2 (рис.4).
Рисунок 3.4. Фрагмент программы с описанием констант и переменных.
В данной курсовой работе рассмотрены математические методы решения систем линейных уравнений: матричный метод и метод Гаусса, приводятся основные конструкции языка Паскаль. Рассмотренные теоретические вопросы дают возможность создания программы на Паскале для решения систем линейных уравнений. В курсовой работе приводится текст данной программы, рассматривается структура программы, анализируются все подпрограммы. Данная программа может быть использована в различных областях, где требуется решение систем линейных уравнений.
1. А.В. Могилев, Н.И. Пак, Е.К. Хеннер "Информатика", Москва, ACADEMA, 2000 г.
2. "
Турбо Паскаль 7.0", Киев, Торгово-издательское бюро BHV, 1997г.
3. С.А. Немнюгин, "Турбо ПАСКАЛЬ", Практикум, Питер, 2002г.
"Решение систем линейных уравнений матричным способом и методом Гаусса"
eps=0.00001; { all numbers less than eps are equal 0 }
type matr=array [1. n,1. n] of real;
{*** печать исходной и обратной матрицы*** }
procedure PrintMatr2 (m,m1: matr; n,nz,nd: integer);
write (m [i,j]: nz: nd); write (' ');
procedure MultString (var a,b: matr; i1: integer; r: real);
procedure AddStrings (var а,b: matr; i1, i2: integer; r: real);
{ процедура прибавляет к i1 строке матрицы а i2-ю умноженную на r}
procedure MultMatr (a,b: matr; var c: matr);
if (r>=0) then sign: =1 else sign: =-1;
{***************************************************}
{** вычеркивание из матрицы строки и столбца **}
procedure GetMatr (a: matr; var b: matr; m, i,j: integer);
procedure gauss (a: matr; b: mas; var x: mas; n: integer);
{расчет неизвестных х в обратном порядке}
writeln ('Вывод результатов решения системы уравнений методом Гаусса');
writeln ('x [',n,'] =',x [n]: 6: 2);
writeln ('x [', i,'] =',x [i]: 6: 2);
procedure matrica (a: matr; y: mas; n: integer);
{ к i-ой строке прибавляем (или вычитаем) j-ую строку
взятую со знаком i-того элемента j-ой строки. Таким образом,
на месте элементова a [i, i] возникает сумма модулей элементов i-того
столбца (ниже i-ой строки) взятая со знаком бывшего элемента a [i, i],
равенство нулю которой говорит о несуществовании обратной матрицы }
AddStrings (a,z, i,j,sign (a [i, i]) *sign (a [j, i]));
writeln ('Обратной матрицы не существует. ');
else writeln ('Обратной матрицы не существует. ');
writeln ('Начальная матрица, обратная к ней матрица: ');
{** умножение обратной матрицы на столбец свободных членов **}
writeln ('Вывод результатов решения системы уравненй матричным способом');
for i: =1 to n do write (' ', s [i]: 5: 2);
begin {***** тело программы ******}
writeln ('ввод матрицы коэффициентов при неизвестных х');
write (' введите a [', i,',',j,'] => ');
writeln ('ввод столбца свободных членов');
writeln (' 1 - решение системы линейных уравнений методом Гаусса ');
write (' 2 - решение системы линейных уравнений матричным методом => ');
else writeln ('неверно указан вариант');

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

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

Курсовая работа: Разработка программы решения системы линейных уравнений
Задача На Тему Сплата Податку На Додану Вартість
Реферат по теме Камерное сушильное устройство с выкатной тележкой
Реферат по теме Технология получения свинца
Реферат: Роль временного фактора в организации профессиональной деятельности гражданских служащих
Реферат по теме Анализ процедур управления
Правовое и социальное государство
Реферат по теме Новые данные иммунных реакций при туберкулезе
Доклад по теме Спирты
Реферат: Биополе. Энергетическая система организма
Дипломная Работа На Тему Філософія І Світогляд
Эссе Аяулы Да Ардақты Адам
Реферат по теме Храмы римского Барокко. Франческо Борромини
Реферат: Основные критерии психического здоровья. Скачать бесплатно и без регистрации
Напишите Эссе Используя Попс Формулу
Бизнес-План На Тему Entrepreneurial Project Individual Project
Реферат по теме Денежные потоки в виде серии равных платежей (аннуитеты)
Реферат по теме Зона психотехнологий (психологический консалтинг в рекламе)
Кости и их соединения
Отчет по практике по теме Гостиница 'Новый берег'
Реферат На Тему Большой Взрыв
Реферат: Правоохранительные органы
Курсовая работа: Эйкозаноиды - общая группа физиологически и фармакологически активных соединений
Курсовая работа: Сон: отдых и лекарство