Реферат: Метод Гаусса с выбором главной переменной - текст реферата. Скачать бесплатно.
Банк рефератов, курсовых и дипломных работ. Много и бесплатно. # | Правила оформления работ | Добавить в избранное
 
 
   
Меню Меню Меню Меню Меню
   
Napishem.com Napishem.com Napishem.com

Реферат

Метод Гаусса с выбором главной переменной

Банк рефератов / Программирование

Рубрики  Рубрики реферат банка

закрыть
Категория: Реферат
Язык реферата: Русский
Дата добавления:   
 
Скачать
Архив Zip, 17 kb, скачать бесплатно
Заказать
Узнать стоимость написания уникального реферата

Узнайте стоимость написания уникальной работы

Метод Гаусса с выбором главной переме нной ( практическая раб ота по к омпьютерной алгебре ) Текст программы . #include #include #include #include const num = 4; int i,j,I,J; int c[num+1]; long double x[num+1]; long double max; long double A[num][num+1]; // ----------------------------------------------------------- void max_el(int sr, int st) max = A[num+1-sr][num+2-st]; I = num+1-sr; J = num+2-st; for (i = num+1-sr ; i<=num ; i++) for (j = num+2-st ; j<=num ; j++) if (fabs(A[i][j]) > fabs(max)) max = A[i][j]; I = i; J = j; cout << "\n\n Max = " << max << " I=" << I<< " J=" << J; // ----------------------------------------------------------- void print(int sr,int st) cout << "\n"; int i,j; for (i = num+1-sr ; i<=num ; i++) for (j = num+2-st ; j<=num+1 ; j++) if (A[i][j] < 0 ) gotoxy(12*j + j - 1,i+1); else gotoxy(12*j + j,i+1); cout << A[i][j]; // ------------------------------------------------------------------ voi d preob(int S) int i,j; long double temp; for (j = S; j<=num+1; j++) A[S][j] = A[S][j]/max; for (i = S + 1; i <= num; i++) temp = A[i][S]; for (j = S; j<= num+1 ; j++) A[i][j] = A[i][j] - A[S][j]*temp; // ------------------------------------------------------------------ void perestanovka(int sr,int st) if (J != (num+1-sr)) for (i = 1; i<=num; i++) A[i][J] = A[i][J] + A[i][num+1-sr]; A[i][num+1-sr] = A[i][J] - A[i][num+1-sr]; A[i][J] = A[i][J] - A[i][num+1-sr]; c[J] = c[J] + c[num+1-sr]; c[num+1-sr] = c[J] - c[num+1-sr]; c[J] = c[J] - c[num+1-sr]; if (I != (num+2-st)) for (j = 1; j<=num+1; j++) A[I][j] = A[I][j] + A[num+2-st][j]; A[num+2-st][j] = A[I][j] - A[num+2-st][j]; A[I][j] = A[I][j] - A[num+2-st][j]; // ------------------------------------------------------------------ void otvet() float temp; for (i=num; i>=1; i--) temp = A[i][num+1]; for(j = num; j > i; j--) temp = temp - A[i][j] *x[j]; x[i] = temp/A[i][i]; // ------------------------------------------------------------------ void interface() clrscr(); print(num,num+1); cout << "\n Массив перестановок стол бцов "; for (i = 1; i <= num ;i++) cout << " " << c[i]; // ------------------------------------------------------------------ void load_file() char ch; ifstream in("c:\\gauss\\mat.dat"); cout << "\n"; for (i = 1 ; i<=num ; i++) c[i] = i; while (ch != '|') in >> ch; ch = 'q'; for (j = 1 ; j<=num+1 ; j++) in >> A[i][j]; // ------------------------------------------------------------------ void main() clrscr(); load_file(); int g; for(g = num+1; g >= 3; g--) interface(); max_el(g-1,g); getch(); perestanovka(g-1,g); interface(); getch(); preob(num+2-g); interface(); getch(); clrscr(); print(num,num+1); otvet(); print(num,num+1); cout << "\n\n "; long double X[num]; for (i=1; i<=num; i++) X[c[i]] = x[i]; for (i=1; i<=num; i++) cout << " X" << i << " = " << X[i]; getch(); Тестовые задания. Задание № 1 (найти неизвестные ): 4.24x 1 + 2.73x 2 - 1.55x 3 = 1.87 2.34x 1 + 1.27x 2 + 3.15x 3 = 2.16 3.05x 1 - 1.05x 2 - 0.63x 3 = -1.25 1.1 Результат в ыполнения программы : x 1 = - 0.025461 x 2 = 0.915112 x 3 = 0.335678 1.2 Расчёт погр ешности вычисления : 4.24*(- 0.025461) + 2.73*0.915112 - 1.55*0.335678 = 1,87000022 погрешность : 2,2*10 -7 2.34*(- 0.025461) + 1.27*0.915112 + 3.15*0.335678 = 2,1599992 погрешность : 8,0*10 -7 3.05*(- 0.025461) - 1.05*0.915112 - 0.63*0.335678 = -1,25000079 погрешность : 7,9*10 -7 средняя погрешность вычисления : 6,0*10 -7 Задание № 2 ( найти неизвестные ): 3.81x 1 + 0.25x 2 + 1.28x 3 + (0.75+a)x 4 = 4.21 2.25x 1 + 1.3 2x 2 + (4.5+a)x 3 + 0.49x 4 = 6.47+b 5.31x 1 + (0.28+a) x 2 + 0.98x 3 + 1.04x 4 = 2.38 (9.39+a)x 1 + 2.45x 2 + 3.35x 3 + 2.28x 4 = 10.48+b a = (0,1,2,3,4) b = (0,1,2,3,4,5) 2.1 Таблица зна чений. a b Ответы : 0 0 X1 = -12.660899 X2 = -16.107649 X3 = 5.273899 X4 = 66.299137 1 X1 = -12.132586 X2 = -14.858407 X3 = 5.186943 X4 = 63.347289 2 X1 = -11.604272 X2 = -13.609166 X3 = 5.099988 X4 = 60.39544 3 X1 = -11.075957 X2 = -12.359925 X3 = 5.013031 X4 = 57.443595 4 X1 = -10.547642 X2 = -11.110685 X3 = 4.926076 X4 = 54.491746 5 X1 = -10.019327 X2 = -9.861445 X3 = 4.839121 X4 = 51.539901 1 0 X1 = 13.959632 X2 = -39.106359 X3 = 7.324007 X4 = -27.756765 1 X1 = 16.668562 X2 = -46.672114 X3 = 8.73446 X4 = -33.605312 2 X1 = 19.377489 X2 = -54.237864 X3 = 10.144913 X4 = -39.453861 3 X1 = 22.086416 X2 = -61.803618 X3 = 11.555367 X4 = -45.30241 4 X1 = 24.795347 X2 = -69.369373 X3 = 12.96582 X4 = -51.150959 5 X1 = 27.504276 X2 = -76.935127 X3 = 14.376274 X4 = -56.999508 2 0 X1 = 1.033843 X2 = -1.696273 X3 = 0.997951 X4 = -0.211727 1 X1 = 1.191176 X2 = -2.016845 X3 = 1.183171 X4 = -0.486773 2 X1 = 1.348508 X2 = -2.337417 X3 = 1.36839 X4 = -0.761819 3 X1 = 1.505841 X2 = -2.657989 X3 = 1.55361 X4 = -1.036865 4 X1 = 1.663174 X2 = -2.978561 X3 = 1.73883 X4 = -1.311911 5 X1 = 1.820507 X2 = -3.299134 X3 = 1.92405 X4 = -1.586957 3 0 X1 = 0.772977 X2 = -0.794749 X3 = 0.762146 X4 = 0.13016 1 X1 = 0.872765 X2 = -0.954303 X3 = 0.902687 X4 = -0.008559 2 X1 = 0.972553 X2 = -1.113856 X3 = 1.043229 X4 = -0.147278 3 X1 = 1.072341 X2 = -1.27341 X3 = 1.18377 X4 = -0.285998 4 X1 = 1.172129 X2 = -1.432964 X3 = 1.324311 X4 = -0.424717 5 X1 = 1.271917 X2 = -1.592518 X3 = 1.464853 X4 = -0.563436 4 0 X1 = 0.675128 X2 = -0.476895 X3 = 0.645225 X4 = 0.196021 1 X1 = 0.754634 X2 = -0.580642 X3 = 0.763131 X4 = 0.105936 2 X1 = 0.83414 X2 = -0.68439 X3 = 0.881037 X4 = 0.015852 3 X1 = 0.913647 X2 = -0.788137 X3 = 0.998942 X4 = -0.074233 4 X1 = 0.993153 X2 = -0.891884 X3 = 1.116848 X4 = -0.164317 5 X1 = 1.072659 X2 = -0.995631 X3 = 1.234754 X4 = -0.254402
1Архитектура и строительство
2Астрономия, авиация, космонавтика
 
3Безопасность жизнедеятельности
4Биология
 
5Военная кафедра, гражданская оборона
 
6География, экономическая география
7Геология и геодезия
8Государственное регулирование и налоги
 
9Естествознание
 
10Журналистика
 
11Законодательство и право
12Адвокатура
13Административное право
14Арбитражное процессуальное право
15Банковское право
16Государство и право
17Гражданское право и процесс
18Жилищное право
19Законодательство зарубежных стран
20Земельное право
21Конституционное право
22Конституционное право зарубежных стран
23Международное право
24Муниципальное право
25Налоговое право
26Римское право
27Семейное право
28Таможенное право
29Трудовое право
30Уголовное право и процесс
31Финансовое право
32Хозяйственное право
33Экологическое право
34Юриспруденция
 
35Иностранные языки
36Информатика, информационные технологии
37Базы данных
38Компьютерные сети
39Программирование
40Искусство и культура
41Краеведение
42Культурология
43Музыка
44История
45Биографии
46Историческая личность
47Литература
 
48Маркетинг и реклама
49Математика
50Медицина и здоровье
51Менеджмент
52Антикризисное управление
53Делопроизводство и документооборот
54Логистика
 
55Педагогика
56Политология
57Правоохранительные органы
58Криминалистика и криминология
59Прочее
60Психология
61Юридическая психология
 
62Радиоэлектроника
63Религия
 
64Сельское хозяйство и землепользование
65Социология
66Страхование
 
67Технологии
68Материаловедение
69Машиностроение
70Металлургия
71Транспорт
72Туризм
 
73Физика
74Физкультура и спорт
75Философия
 
76Химия
 
77Экология, охрана природы
78Экономика и финансы
79Анализ хозяйственной деятельности
80Банковское дело и кредитование
81Биржевое дело
82Бухгалтерский учет и аудит
83История экономических учений
84Международные отношения
85Предпринимательство, бизнес, микроэкономика
86Финансы
87Ценные бумаги и фондовый рынок
88Экономика предприятия
89Экономико-математическое моделирование
90Экономическая теория

 Анекдоты - это почти как рефераты, только короткие и смешные Следующий
Если мужчина сильно вас обидел, плюньте и принесите ему кофе с пенкой.
Anekdot.ru

Узнайте стоимость курсовой, диплома, реферата на заказ.

Обратите внимание, реферат по программированию "Метод Гаусса с выбором главной переменной", также как и все другие рефераты, курсовые, дипломные и другие работы вы можете скачать бесплатно.

Смотрите также:


Банк рефератов - РефератБанк.ру
© РефератБанк, 2002 - 2016
Рейтинг@Mail.ru