Решение линейного уравнения методом Гаусса с выбором главной переменной

                ГОСУДАРСТВЕННЫЙ КОМИТЕТ РОССИЙСКОЙ ФЕДЕРАЦИИ
                 ПО ВЫСШЕМУ И СРЕДНЕСПЕЦИАЛЬНОМУ ОБРАЗОВАНИЮ
            КРАСНОЯРСКИЙ ГОСУДАРСТВЕННЫЙ ТЕХНИЧЕСКИЙ УНИВЕРСИТЕТ



                            Практическое задание

                           по компьютерной алгебре

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



                                                                   Выполнил:
                                                        студент 2 курса ФИВТ
                                                                 группы 27-4
                                                                  Попов А.В.

                                                                  Проверила:
                                                                 Быкова Е.Г.



                                   1998 г.
                              Текст программы.

#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 fabs(max))
                 {
                 max = A[i][j];
                 I = i;
                 J = j;
                 }
            }
      }
      cout =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 > ch;
             ch = 'q';
             for (j = 1 ; j> 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 





  

    
Для добавления страницы "Решение линейного уравнения методом Гаусса с выбором главной переменной" в избранное нажмине Ctrl+D