рефераты рефераты
 

Главная

Разделы

Новости

О сайте

Контакты

 
рефераты

Авиация и космонавтика
Административное право
Арбитражный процесс
Архитектура
Астрология
Астрономия
Банковское дело
Безопасность жизнедеятельности
Бизнес-план
Биология
Бухучет управленчучет
Водоснабжение водоотведение
Военная кафедра
География и геология
Геодезия
Государственное регулирование и налогообложение
Гражданское право
Гражданское процессуальное право
Животные
Жилищное право
Иностранные языки и языкознание
История и исторические личности
Коммуникации связь цифровые приборы и радиоэлектроника
Краеведение и этнография
Кулинария и продукты питания
Культура и искусство
Литература
Логика
Логистика
Маркетинг
Масс-медиа и реклама
Математика
Медицина
Международное и Римское право
Уголовное право уголовный процесс
Трудовое право
Журналистика
Химия
География
Иностранные языки
Без категории
Физкультура и спорт
Философия
Финансы
Фотография
Химия
Хозяйственное право
Цифровые устройства
Таможенная система
Теория государства и права
Теория организации
Теплотехника
Технология
Товароведение
Транспорт
Трудовое право
Туризм
Уголовное право и процесс
Управление
Радиоэлектроника
Религия и мифология
Риторика
Социология
Статистика
Страхование
Строительство
Схемотехника
История
Компьютеры ЭВМ
Культурология
Сельское лесное хозяйство и землепользование
Социальная работа
Социология и обществознание

рефераты
рефераты

НАУЧНАЯ БИБЛИОТЕКА - РЕФЕРАТЫ - Методы решения некорректно поставленных задач

Методы решения некорректно поставленных задач

ВВЕДЕНИЕ

Среди математических задач выделяется класс задач, решения которых

неустойчивы к малым изменениям исходных данных. Они характеризуются тем,

что сколь угодно малые изменения исходных данных могут приводить к

произвольно большим изменениям решений. Задачи подобного типа, по существу,

являются плохо поставленными. Они принадлежат к классу некорректно

поставленных задач.

Быстро растущее использование вычислительной техники требует развития

вычислительных алгоритмов для решения широких классов задач. Но что надо

понимать под «решением» задачи? Каким требованиям должны удовлетворять

алгоритмы нахождения « решений »?

Классические концепции и постановки задач не отражают многих

особенностей встречающихся на практике задач. Мы покажем это на примере.

Рассмотрим систему линейных алгебраических уравнений

Az=u,

где z — искомый вектор, и — известный вектор, А ={aij} — квадратная матрица

с элементами aij.

Если система невырожденная, т. е. detA ? 0, то она имеет единственное

решение, которое можно найти по известным формулам Крамера или другими

способами.

Если система вырожденная, то она имеет решение (притом не единственное)

лишь при выполнении условий разрешимости, состоящих из равенств нулю со-

ответствующих определителей.

Таким образом, прежде чем решить систему, надо проверить, вырожденная она

или нет. Для этого требуется вычислить определитель системы detA.

Если п — порядок системы, то для вычисления detА требуется выполнить

около п3 операций. С какой бы точностью мы ни производили вычисления, при

достаточно большом значении п, вследствие накопления ошибок вычисления, мы

можем получить значение detА, как угодно отличающееся от истинного. Поэтому

желательно иметь (построить) такие алгоритмы нахождения решения системы,

которые не требуют предварительного выяснения вырожденности или

невырожденности системы.

Кроме того, в практических задачах часто правая часть u и элементы

матрицы А,

т. е. коэффициенты системы уравнений, известны нам приближенно. В этих

случаях вместо системы, мы имеем дело с некоторой другой системой A1z=u1

такой, что

||А1— А|| О можно указать такое число ? (?) > 0, что из неравенства ?U(u1,u2)0. Такой элемент мы будем называть приближенным (к

zT) решением уравнения Az = и1.

Элементы z?F, удовлетворяющие условию ?U(Az, и1)0

при n>?. При каких условиях можно утверждать, что при этом и ?F(zn,zT) >0,

т. е. что {zn} сходится к zT?

Это вопрос обоснования эффективности метода подбора.

2.1.2. Стремление обосновать успешность метода подбора привело к

установлению общефункциональных требований, ограничивающих класс возможных

решений М, при которых метод подбора является устойчивым и zn>zT. Эти

требования заключаются в компактности множества М и основываются на

приводимой ниже известной топологической лемме.

Лемма. Пусть метрическое пространство F отображается на

метрическое пространство U и Uo — образ множества Fo, Fo? F, при этом

отображении. Если отображение F>U непрерывно, взаимно однозначно и

множество Fo компактно на F, то обратное отображение Uo>Fo множества Uo на

множество Fo также непрерывно по метрике пространства F.

Доказательство. Пусть z — элементы множества F (z?F), а u—элементы

множества U (u?U). Пусть функция u=?(z) осуществляет прямое отображение

F>U, а функция z=?(u)—обратное отображение U>F.

Возьмем произвольный элемент u0 из Uo. Покажем, что функция ?(u) непрерывна

на u0. Предположим, что это неверно. Тогда существует такое число ?1 > 0,

что для всякого ? > 0 найдется элемент и1 из Uo, для которого ?U(и1, и0)

= ?1. Здесь z=?(u1), z0=?(u0) и z1?Fo,

z0?F0.

Возьмем последовательность {?n} положительных чисел ?n , сходящуюся к нулю

при п>?. Для каждого ?n найдется элемент un1 из Uo, для которого ?U(иn1,

и0)< ?n , но ?F(zn1,z0)>= ?1 , где zn1=?(un1). Очевидно, последовательность

{un1} сходится к элементу u0. Так как zn1 принадлежат компактному на F

множеству Fo, то из последовательности {zn1} можно выбрать

подпоследовательность {Z1nk}, сходящуюся по метрике F к некоторому элементу

z0 ?F. При этом z01?z0 , так как для всякого nk ?F(Z1nk,z0)>= ?1 ,

следовательно и ?F(z10,z0)>= ?1 . Этой подпоследовательности {Z1nk}

отвечает последовательность элементов u1nk= ? (Z1nk) из Uo, сходящаяся к

u10= ?(z10) и являющаяся подпоследовательностью последовательности {u1n}.

Так как последовательность {u1n} сходится к и0 =?(z0), то

u10=?(z10)=u0=?(z0) , т. е. ?(z0)= ?(z10). В силу взаимной однозначности

отображения F>U z10=z0, что противоречит ранее установленному неравенству

z10?z0. Лемма доказана.

Эту лемму можно сформулировать короче.

Если отображение Fo(Uo компакта Fo на множество Uo взаимно однозначно

и непрерывно, то обратное отображение Uo(Fo также непрерывно.

Эквивалентность этих формулировок следует из того, что замыкание F*0

множества Fo, компактного на F, является компактом.

Таким образом, минимизирующая последовательность {zn} в методе подбора

сходится к zT при n(?, если:

а)zT принадлежит классу возможных решений М;

б) множество М — компакт.

Пусть оператор А непрерывен и вместо точной правой части uT мы имеем

элемент u? такой, что ?U(u?,uT )=?2>=…>=?n>=… — полная система его собственных

значений, a ?1, ?2,…, ?n,…—отвечающая им полная ортонормированная система

его собственных элементов (функций, векторов). Элемент А*и можно

представить в виде ряда

[pic]

(2;2,2)

В этих условиях справедлива

Теорема 3. Квазирешение уравнения (2, 0,1) на множестве SR выражается

формулами:

[pic]

(2;2,3)

если

[pic]

(2;2,4)

и

[pic]

если

[pic]

(2;2,5)

Здесь ? — корень уравнения

[pic] (2;2,6)

Доказательство. Квазирсшение минимизирует функционал

?U2 (Az, u) == (Az — u, Az — u)

(2;2,7)

(где (v,w ) — скалярное произведение элементов v и w из U), уравнение

Эйлера для которого имеет вид

A*Az=A*u.

(2;2,8)

Решение этого уравнения будем искать в виде ряда по системе {?n}:

[pic]

(2;2,9)

Подставляя этот ряд в уравнение (2; 2,8) и используя разложение (2;2,2),

находим сn=bn/?n. Следовательно, неравенство (2; 2,4) означает, что ||z||=R и надо решать задачу на условные экстремум функционала (2; 2,7)

при условии, что || z ||2 = R2. Методом неопределенных множителей Лагранжа

эта задача сводится к нахождению безусловного экстремума функционала

(Аz-u, Аz-u) + ? (z, z),

а последняя — к решению отвечающего ему уравнения Эйлера A*Az+?z=А*и.

Подставляя сюда z в виде ряда (2; 2,9) и используя разложение (2; 2,2),

находим

[pic]

Параметр ? определяем из условия || z ||2 = R2 , которое эквивалентно (2;

2,6).

2.3. Приближенное нахождение квазирешений

В предыдущем параграфе мы видели, что нахождение квазирешения связано

с нахождением элемента в бесконечномерном пространстве. Для приближенного

нахождения квазирешения естественно переходить к конечномерному

пространству. Можно указать достаточно общий подход к приближенному

нахождению квазирешений уравнения (2; 0,1) , в котором А—вполне непрерывный

оператор.

Будем полагать, что выполнены указанные в 2.2. достаточные условия

существования единственного квазирешения на заданном множестве М, т. е.

полагаем, что множество М — выпуклый компакт и сфера в пространстве U

строго выпукла. Пусть

M1 ? M2 ?...? Mn ?...

— возрастающая цепочка компактных замкнутых множеств Мn такая, что

замыкание их объединения [pic] совпадает с М. Квазирешение уравнения (2;

0,1) существует на каждом множестве Мn . Но оно может быть не единственным.

Обозначим через Тn совокупность всех квазирешений на множестве Мn .

Покажем, что в качестве приближения к квазирешению z1 на множестве М

можно брать любой элемент z1n из Тn . При этом

[pic]

Пусть Nn = АМn и Вn — множество проекций элемента и на множество Nn .

Очевидно, что Вn = АТn и N1 ? N2 ? …? Nn; тогда

? U(u,N1)>= …>=? U (u,Nn)>=… ? U (u,N)= ? U (u,Az1) .

(2;3,1)

Так как множество [pic]всюду плотно на N, то для всякого ? >0 найдется

такое число n0(?), что для всех п >n0(?)

?U(u,Nn)< ?U(u,N)+ ?

(2; 3,2)

Из (2; 3,1) и (2; 3,2) следует, что

[pic] (2;3,3)

Поскольку

то

[pic]

[pic]

(2;3,4)

Каждое множество Вn есть компакт, так как оно является замкнутым

подмножеством компакта Nn. Поэтому в Вn найдется такой элемент уn , что

?U(yn ,u) = inf ?U(y,u)

y?Bn

Последовательность {yn} имеет хотя бы одну предельную точку,

принадлежащую N, так как N — компакт. Пусть у0 — какая-нибудь предельная

точка множества {yn} и {уnk} — подпоследовательность, сходящаяся к y0 , т.

е.

[pic]

Из (2; 3,3) и (2; 3,4) следует, что

[pic]

Таким образом,

?U(u,y0)= ?U(u,N).

Отсюда и из единственности квазирешения на множестве М следует, что

y0=Az1.

Так как у0 — произвольная предельная точка множества {yn}, то

последовательность {уn} сходится к Аz1. Это и означает, что в качестве

приближения к квазирешению можно брать любой элемент z1n из множества Тп ,

так как в силу леммы параграфа 2.1. z1n(z* при n(?.

Если в качестве Мп брать конечномерные (n-мерные) множества, то задача

нахождения приближенного квазирешения на компакте М сводится к минимизации

функционала ?U(Az, u) на множестве Мп , т. е. к нахождению минимума функции

п переменных.

2.4. Замена уравнения Аz=u близким ему

Уравнения вида (2; 0,1), в которых правая часть u не принадлежит

множеству N=AM, изучались М. М. Лаврентьевым . Ему принадлежит идея замены

исходного уравнения (2; 0,1) близким ему, в некотором смысле, уравнением,

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

части и разрешима для любой правой части u ?U. В простейшем случае это

делается следующим образом.

Пусть F ?U ?Н — гильбертовы пространства, А — линейный, ограниченный,

положительный и самосопряженный оператор, SR ? 0. В качестве класса корректности М берется множество

DR=BSR — образ шара SR при отображении с помощью оператора В.

Предполагается, что искомое точное решение zT уравнения (2; 0,1) с правой

частью u=uT существует и принадлежит множеству DR. Уравнение (2; 0,1)

заменяется уравнением

(A+?E)z ? Az+?z=u ,

(2:4,1)

где ?>0 – числовой параметр. Решение уравнения

z?=(A+?E)-1u ,

(2; 4,2)

при соответствующем выборе параметра ?, принимается за приближенное решение

уравнения (2; 0,1). Здесь Е — единичный оператор.

Замечание. Для оценки уклонения ?F(zT,z?) приближенного решения от

точного можно использовать модуль непрерывности ? обратного оператора на N.

Пусть u1, u2 ? N и ?U(u1,u2) 0}, удовлетворяющего граничным условиям

u(х, t) =0 при x?S

(2; 5,2)

и начальным условиям

u(x, 0)= ?(x).

(2; 5,3)

Здесь

[pic]

Известно, что решение такой задачи существует. Каждой функции ?(x)?C

отвечает решение задачи (2; 5,1)— (2; 5,3). Будем обозначать его через u(х,

t; ?).

Обратная задача состоит в нахождении функции ?(х) по известной функции

u(х,t; ?). В реальных задачах функция u(x,t;?) обычно получается в

результате измерений и, следовательно, известна приближенно. Будем

полагать, что u?L2. Такая функция может и не соответствовать никакой

«начальной» функции ?(х). Таким образом, может не существовать в классе

функций С решения обратной задачи. Поэтому будем рассматривать задачу

нахождения некоторого обобщенного решения обратной задачи.

Пусть заданы число T > 0 и функция ?(x), определенная в области D,

?(x) ?L2. На функциях ?(х) класса С определен функционал

[pic]

Обобщенным решением обратной задачи будем называть функцию ?(х)., на

которой достигается

f0=inf f(?)

??C

Замечание. «Естественный» подход к решению этой задачи — выбрать функцию

?(х).так, чтобы f(?)=0 .

Для этого достаточно найти решение прямой задачи

[pic]

u(x, t) = 0 для х ? S, 0 < t < T;

u(x,T) = ?(x)

и положить ? (x) = u(x,0). Но такая задача при заданной функции ?(x) из L2,

вообще говоря, неразрешима и, кроме того, неустойчива к малым изменениям

функции ?(x).

На некотором классе обобщенных функций ? (x) f0=0 . Поэтому

рассматривается задача нахождения приближенного значения f0 с заданным

уровнем погрешности.

Для заданного числа ? > 0 найти функцию ??(x), на которой f (??) 0;

u? (x,T)= ?(x);

u? (x,t) = 0 для x? S, t< Т

устойчива. Решив эту задачу, полагают ? (x)=u?(x,0). Обычно в качестве

оператора В? берут оператор [pic] и решают прямую задачу

x? D, t0;

[pic]

u? (x,T)= ?(x);

u? (x,t) = 0 для x? S, 0< t 0 такие, что

?U(u?,uT) 0, что оператор R(u, ?) определен для

всякого ?, 0 0 существует ?0=?0(?, u?)0, ?1>0, что оператор R(u, ? ) определен

для всякого ?, принадлежащего промежутку (0, ?1), и любого u?U, для

которого

?U(u,uT) 0 найдется число

?(?)0 множество F1,d элементов z из F1 , для

которых

?[ z ]=0, где inf берется по всем векторам z ? Rn.

Естественно искать приближения z? в классе Q? векторов z,

сопоставимых по точности с исходными данными, т. е. таких, что || Az – u

|| 0;

2) при ? (0 z?== R1(u, ?) стремится к нормальному решению z°

уравнения Аz=u, т. е. он является регуляризирующим для уравнения Аz=u .

3.3.3. Пусть z? — вектор, на котором функционал ?[ z ] = ||z||2

достигает минимума на множестве Q?. Легко видеть из наглядных

геометрических представлений, что вектор z? лежит на границе множества Q?,

т.е. ||Az? - u ||=? +2? =?1.

Это следует непосредственно также из того, что функционал ?[ z ] = ||z||2

является сстабилизирующим и квазимонотонным. Стабилизирующий функционал ?[

z ] называется квазимонотонным , если каков бы ни был элемент z из F1 , не

принадлежащий множеству M0 , в любой его окрестности найдется элемент z1 из

F1, для которого ?[ z1 ]< ?[ z ], т.е. если функционал не имеет локальных

минимумов на множестве F1\ M0.

Задачу нахождения вектора z? можно поставить так: среди векторов z,

удовлетворяющих условию ||Az – u ||=? +2? , найти вектор z? с минимальной

нормой, т. е. минимизирующий функционал ?[ z ]=||z||2.

Последнюю задачу можно решать методом Лагранжа, т. е. в качестве z?

брать вектор z?, минимизирующий функционал

М? [z, u] = ||Az - u ||2+ ?||z||2, ?>0,

с параметром ?, определяемым по невязке, т. е. из условия ||Аz?— u||=?1.

При этом параметр ? определяется однозначно .

3.3.4. Поскольку М? [z, u] — квадратичный функционал, то для любых u

?Rm и ?> 0 существует лишь один минимизирующий его вектор z?. В самом

деле, допустим,

что существуют два вектора z? и z?, минимизирующие его. Рассмотрим векторы

z, расположенные на прямой (пространства Rn), соединяющей z? и z?:

z = z? + ?( z? - z?).

Функционал М? [z, u] на элементах этой прямой есть неотрицательная

квадратичная функция от ?. Следовательно, она не может достигать

наименьшего значения при двух различных значениях ?: ? = 0 (z = z?) и ?=1

(z = z?).

Компоненты zj? вектора z? являются решением системы линейных

алгебраических уравнений

[pic]

получающихся из условий минимума функционала М? [z, u]:

[pic]

Здесь

[pic]

Компоненты zj? могут быть определены и с помощью какого-нибудь другого

алгоритма минимизации функционала М? [z, u].

Вектор z? можно рассматривать как результат применения к u

некоторого оператора z?=R(u, ?), зависящего от параметра ?.

Покажем, что оператор R0(u, ?) является регуляризирующим для системы

(3;3,1), т. е. обладает свойствами 1) и 2) определения 2 (см. 3.1.2.). В п.

3.3.2. было сказано, что он определен для всяких u ?Rm и ? > О и,

следовательно, обладает свойством 1). Теперь покажем справедливость

свойства 2), т. е. существование таких функций ?=?(?) , что векторы z?(?) =

R0(u, ?(?)) сходятся к нормальному решению z° системы (3; 3,1) при ?(0. Это

непосредственно следует из приводимой ниже теоремы 2.

Теорема 2( Тихонова). Пусть z° есть нормальное решение системы Az= u и

вместо вектора u мы имеем вектор u такой, что ||u—u||<=?. Пусть, далее,

?1(?) и ?2(?) — какие-либо непрерывные на [0, ?2] и положительные на (0,

?2] функции, монотонно стремящиеся к нулю при ?( 0 и такие, что

[pic]

Тогда для любой .положительной на (0, ?2] функции ?’?(?) , удовлетворяющей

условиям

[pic]

векторы z?(?) = R0(u, ?(?)) сходятся к нормальному решению z0 системы Az =

u при ?(0, т. е.

[pic]

Примечание. Доказательства теорем в данном разделе опущены, т.к. основной

теоретической частью работы является раздел «Метод Подбора. Квазирешения».

Метод Тихонова описан из-за использования его в численном эксперименте.

ЗАКЛЮЧЕНИЕ

Для реализации численного примера был выбран метод Тихонова решения

плохо обусловленных СЛАУ. В качестве исходной была взята СЛАУ Az=u,

имеющая в матричной записи вид:

[pic]

Определитель матрицы коэффициентов этой системы близок к нулю – он равен

0.000125. Попробуем решить эту систему с помощью обратной матрицы:

z=A-1u

Получим z1=316

z2=-990

z3=832

Теперь предположим, что правая часть нам известна приближенно, с

погрешностью 0.1 Изменим, к примеру, третий элемент вектора-столбца с 1 на

1.1 :

[pic]

Попробуем решить новую систему также с помощью обратного оператора. Мы

получаем другой результат:

z1=348

z2=-1090

z3=916.

Мы видим, что малому изменению правой части данной системы отвечают

весьма значительные изменения решения. Очевидно, эта система – плохо

обусловленная, и здесь не может идти речи о нахождении решения близкого к

точному с помощью обратного оператора.

Будем искать решение методом Тихонова. В теоретической части было

показано, что целесообразно использовать регуляризирующий оператор

следующего вида: (?E + ATA)z?=ATu? , где E – единичная матрица, z? --

приближенное нормальное решение, AT – транспонированная исходная матрица, ?

-- параметр регуляризации,

u? -- правая часть, заданная неточно. Эту задачу можно решать стандартными

методами, задав предварительно функцию ?’?(?) , удовлетворяющую условиям

теоремы Тихонова. В моем примере это функция ?(?)=?/4?. Далее будем решать

регуляризованную задачу с точностью ?’0.001 ,последовательно изменяя

значения ?.

В качестве контр-примера можно подставить в программу любую функцию ?(?) ,

не удовлетворяющую условиям теоремы Тихонова. Любая положительная функция

монотонно возрастающая, не обладающая свойством ?(?)(0 при ?(0, не будет

минимизировать невязку.

Текст программы приведен в приложении 1. Полная распечатка результатов

приведена в приложении 2. Здесь же представлены окончательные значения на

выходе из программы.

Приближение к нормальному решению

Z(1)= 3.47834819174013E+0002

Z(2)=-1.08948394975175E+0003

Z(3)= 9.15566443137791E+0002

Значение правой части при подстановке прибл. решения

U1(1)= 9.99997717012495E-0001

U1(2)= 1.00000741970775E+0000

U1(3)= 1.09948402394883E+0000

Значение параметра регуляризации:

2.61934474110603E-0010

ПРИЛОЖЕНИЯ

Приложение 1.

Текст программы для реализации метода Тихонова на языке PASCAL

Uses CRT;

type

real=extended;

const

matrixA: array[1..3,1..3] of real = ((-19/20,1/5, 3/5),

(-1 ,0.1, 0.5),

(-0.01 ,0 ,1/200));

One: array [1..3,1..3] of real = ((1,0,0),

(0,1,0),

(0,0,1));

U:array[1..3] of real = (1,1,1.1);

var

i,j,k,q:byte;

A,At,A1,A2,Ar,One1:array[1..3,1..3] of real;

delta,Det,S,alpha:real;

B,Z,U1:array[1..3] of real;

f:text;

Procedure TransA;

begin

for i:=1 to 3 do

for j:=1 to 3 do

At[i,j]:=A[j,i]

end;

Function Koef(par1,par2:byte):real;

var

Sum:byte;

Tmp:real;

begin

Sum:=par1+par2;

Tmp:=1;

for k:=1 to sum do

Tmp:=Tmp*(-1);

Koef:=Tmp;

end;

Function AlAdd(par1,par2:byte):real;

type

element=record

value:real;

flag:boolean;

end;

var

BB:array[1..2,1..2] of real;

AA:array[1..3,1..3] of element;

k,v,w:byte;

N:array[1..4] of real;

P1:real;

begin

for v:=1 to 3 do

for w:=1 to 3 do begin

AA[v,w].value:=A2[v,w];

AA[v,w].flag:=true

end;

for v:=1 to 3 do AA[par1,v].flag:=false;

for v:=1 to 3 do AA[v,par2].flag:=false;

{ for v:=1 to 3 do begin

for w:=1 to 3 do write(AA[i,j].value:2:3,' ');

writeln

end; }

k:=1;

for v:=1 to 3 do

for w:=1 to 3 do

begin

if AA[v,w].flag then

begin

N[k]:=AA[v,w].value;

{ writeln(N[k]);}

k:=k+1

end;

end;

BB[1,1]:=N[1]; BB[1,2]:=N[2];

BB[2,1]:=N[3]; BB[2,2]:=N[4];

{ writeln('alg dop',par1,par2,' ',BB[1,1]*BB[2,2]-BB[1,2]*BB[2,1]);}

AlAdd:=BB[1,1]*BB[2,2]-BB[1,2]*BB[2,1];

end;

Function DetCount:real;

var

S1:real;

z:byte;

begin

S1:=0;

for z:=1 to 3 do S1:=S1+A2[1,z]*Koef(1,z)*AlAdd(1,z);

DetCount:=S1;

end;

Procedure RevMatr;

begin

for i:=1 to 3 do

for j:=1 to 3 do

Ar[j,i]:=Koef(i,j)*AlAdd(i,j)/DetCount;

{ for i:=1 to 3 do begin

for j:=1 to 3 do write(Ar[i,j],' ');

writeln;

end;}

end;

Function AllRight:boolean;

begin

writeln(f,'­Ґўп§Є Ї® 1-¬г н«-вг',(abs(U[1]-U1[1])));

writeln(f,'­Ґўп§Є Ї® 2-¬г н«-вг',(abs(U[2]-U1[2])));

writeln(f,'­Ґўп§Є Ї® 3-¬г н«-вг',(abs(U[3]-U1[3])));

writeln(F);

if (abs(U[1]-U1[1])<0.001) and (abs(U[2]-U1[2])<0.001) and

(abs(U[3]-U1[3])<0.001) then AllRight:=true

else AllRight:=false

end;

Function Pow(par1:real;par2:byte):real;

var

S2:real;

z:byte;

begin

S2:=1;

if par2=0 then begin

Pow:=1;

exit

end

else

for z:=1 to par2 do S2:=S2*par1;

Pow:=S2;

end;

BEGIN

clrscr;

Assign(f,'c:\tikh.txt');

Rewrite(f);

for i:=1 to 3 do

for j:=1 to 3 do

A[i,j]:=matrixA[i,j];

TransA;

Det:=0.000125;

{----------------------------}

for i:=1 to 3 do begin

S:=0;

for j:=1 to 3 do begin

S:=S+At[i,j]*U[j];

B[i]:=S

end;

end;

{----------------------------}

for i:=1 to 3 do

for j:=1 to 3 do

begin

S:=0;

for k:=1 to 3 do begin

S:=S+At[i,k]*A[k,j];

A1[i,j]:=S

end

end;

{-----------------------------}

q:=1;

repeat

alpha:=q/pow(4,q);

for i:=1 to 3 do

for j:=1 to 3 do

One1[i,j]:=One[i,j]*alpha;

for i:=1 to 3 do

for j:=1 to 3 do

A2[i,j]:=One1[i,j]+A1[i,j];

RevMatr;

{------------------------------}

for i:=1 to 3 do begin

S:=0;

for j:=1 to 3 do begin

S:=S+Ar[i,j]*B[j];

Z[i]:=S

end;

end;

for i:=1 to 3 do begin

S:=0;

for j:=1 to 3 do begin

S:=S+A[i,j]*Z[j];

U1[i]:=S

end

end;

q:=q+1;

until AllRight;

{------------------------------}

clrscr;

writeln('ЏаЁЎ«Ё¦Ґ­ЁҐ Є ­®а¬ «м­®¬г аҐиҐ­Ёо');

for i:=1 to 3 do writeln('Z(',i,')=',z[i]);

writeln;

writeln('‡­ 祭ЁҐ Їа ў®© з бвЁ ЇаЁ Ї®¤бв ­®ўЄҐ ЇаЁЎ«. аҐиҐ­Ёп');

for i:=1 to 3 do writeln('U1(',i,')=',U1[i]);

writeln;

writeln('‡­ 祭ЁҐ Ї а ¬Ґва ॣг«паЁ§ жЁЁ:');

writeln(alpha);

Close(f);

readln;

END.

Приложение 2.

Распечатка результатов пересчета на каждом шаге

невязка по 1-му эл-ту 7.75620788018006E-0002

невязка по 2-му эл-ту 9.12970302562861E-0002

невязка по 3-му эл-ту 1.09101153877771E+0000

невязка по 1-му эл-ту 3.51667654246499E-0002

невязка по 2-му эл-ту 4.81631787337596E-0002

невязка по 3-му эл-ту 1.09057642915500E+0000

невязка по 1-му эл-ту 8.14255746519741E-0003

невязка по 2-му эл-ту 1.75271999674588E-0002

невязка по 3-му эл-ту 1.09024740493812E+0000

невязка по 1-му эл-ту 1.64128226088452E-0004

невязка по 2-му эл-ту 1.40420815653456E-0003

невязка по 3-му эл-ту 1.09002512985506E+0000

невязка по 1-му эл-ту 1.09651876415789E-0003

невязка по 2-му эл-ту 8.01044623892439E-0003

невязка по 3-му эл-ту 1.08980075500722E+0000

невязка по 1-му эл-ту 3.24092274239579E-0003

невязка по 2-му эл-ту 1.28969442769472E-0002

невязка по 3-му эл-ту 1.08943309314635E+0000

невязка по 1-му эл-ту 4.29878415191160E-0003

невязка по 2-му эл-ту 1.47864580098997E-0002

невязка по 3-му эл-ту 1.08840358157784E+0000

невязка по 1-му эл-ту 4.64764022304719E-0003

невязка по 2-му эл-ту 1.53489294761093E-0002

невязка по 3-му эл-ту 1.08488736141985E+0000

невязка по 1-му эл-ту 4.70263264899617E-0003

невязка по 2-му эл-ту 1.53524096326819E-0002

невязка по 3-му эл-ту 1.07252416252061E+0000

невязка по 1-му эл-ту 4.54618391386039E-0003

невязка по 2-му эл-ту 1.47935415193105E-0002

невязка по 3-му эл-ту 1.03007092553528E+0000

невязка по 1-му эл-ту 3.97950585276394E-0003

невязка по 2-му эл-ту 1.29378307693635E-0002

невязка по 3-му эл-ту 9.00028069734717E-0001

невязка по 1-му эл-ту 2.71895340473448E-0003

невязка по 2-му эл-ту 8.83742514077426E-0003

невязка по 3-му эл-ту 6.14624514462952E-0001

невязка по 1-му эл-ту 1.25089904346179E-0003

невязка по 2-му эл-ту 4.06552487723671E-0003

невязка по 3-му эл-ту 2.82729125073012E-0001

невязка по 1-му эл-ту 4.15581257891512E-0004

невязка по 2-му эл-ту 1.35064829843828E-0003

невязка по 3-му эл-ту 9.39264706989556E-0002

невязка по 1-му эл-ту 1.18814900667952E-0004

невязка по 2-му эл-ту 3.86149131520602E-0004

невязка по 3-му эл-ту 2.68533566153482E-0002

невязка по 1-му эл-ту 3.22671215741144E-0005

невязка по 2-му эл-ту 1.04868192738639E-0004

невязка по 3-му эл-ту 7.29267248287954E-0003

невязка по 1-му эл-ту 8.61328853146714E-0006

невязка по 2-му эл-ту 2.79931897352870E-0005

невязка по 3-му эл-ту 1.94668264668650E-0003

невязка по 1-му эл-ту 2.28298750498679E-0006

невязка по 2-му эл-ту 7.41970775380851E-0006

невязка по 3-му эл-ту 5.15976051172231E-0004

Приближение к нормальному решению

Z(1)= 3.47834819174013E+0002

Z(2)=-1.08948394975175E+0003

Z(3)= 9.15566443137791E+0002

Значение правой части при подстановке прибл. решения

U1(1)= 9.99997717012495E-0001

U1(2)= 1.00000741970775E+0000

U1(3)= 1.09948402394883E+0000

Значение параметра регуляризации:

2.61934474110603E-0010

СПИСОК ИСПОЛЬЗОВАННЫХ ИСТОЧНИКОВ

1.А.Н.ТИХОНОВ, В.Я.АРСЕНИН «МЕТОДЫ РЕШЕНИЯ НЕКОРРЕКТНЫХ ЗАДАЧ» – МОСКВА

«НАУКА» 1979.

2.Г.И.МАРЧУК «МЕТОДЫ ВЫЧИСЛИТЕЛЬНОЙ МАТЕМАТИКИ» – МОСКВА «НАУКА» 1977.

3.Л.И.ГОЛОВИНА «ЛИНЕЙНАЯ АЛГЕБРА И НЕКОТОРЫЕ ЕЕ ПРИЛОЖЕНИЯ» – МОСКВА

«НАУКА» 1975.

4.В.И.РАКИТИН, В.Е.ПЕРВУШИН «ПРАКТИЧЕСКОЕ РУКОВОДСТВО ПО МЕТОДАМ

ВЫЧИСЛЕНИЙ» – МОСКВА «ВЫСШАЯ ШКОЛА» 1998.

5.В.В.ФАРОНОВ «ПРОГРАММИРОВАНИЕ НА ПЕРСОНАЛЬНЫХ ЭВМ В СРЕДЕ TURBO PASCAL»

-- ИЗДАТЕЛЬСТВО МГТУ 1990.

рефераты
© РЕФЕРАТЫ, 2012

рефераты