0 / 0 / 1
Регистрация: 30.01.2013
Сообщений: 35

Решение СЛАУ методом Крамера

14.06.2013, 03:28. Показов 1706. Ответов 0
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Надо было написать прогу, ищущую столбец решений СЛАУ методом Крамера, используя определитель n мерной матрицы , найденный с помощью миноров( рекурсивно). ПРога выдавала ошибки, в конце концов вообще стала вылетать( не компелируется). Что может быть не так?

C++
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
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
#include <time.h>
#include <iostream>
#include <math.h>
#include <stdlib.h>
 
using namespace std;
//extern int X;
 
int **FIND_Minor( int **matrix, int size, int str, int stb )
 
{
 
    
    int **minor = new int *[ size - 1 ];
 
    //m_str, m_stb - коэффициенты, с помощью которых строится сам минор
    int m_str = 0;
    int m_stb;
    for( int i = 0; i < size; i++ )
    {
        //Элементы из строки с номером str не записываются в минор
        if( i != str )
        {
            m_stb = 0;
            minor[ m_str ] = new int[ size - 1 ];
            for( int j = 0; j < size; j++ )
            {
                //Элементы из столбца с номером stb не записываются в минор
                if( j != stb )
                {
                    minor[ m_str ][ m_stb ] = matrix[ i ][ j ];
                    m_stb++;
                }
            }
            m_str++;
        }
    }
 
    return minor;
}
 
long long FIND_Det( int **matrix, int size )
{
 
    //Проверка условия выхода из рекурсии
    if( size == 2 )
    {
        return matrix[ 0 ][ 0 ] * matrix[ 1 ][ 1 ] - matrix[ 0 ][ 1 ] * matrix[ 1 ][ 0 ];
    }
    else if( size == 1 )
    {
        return matrix[ 0 ][ 0 ];
    }
 
   //Момент оптимизации - ищем строку, в которой больше всего нулей, чтобы по ней находить определитель
    //Работает в связи с условием разложения по строке, которое пояснено ниже
    int max_0, str_0 = 0, max_0_b = 0;
    for( int i = 0; i < size; i++ )
    {
        max_0 = 0;
        for( int j = 0; j < size; j++ )
        {
            if( matrix[ i ][ j ] == 0 )
            {
                max_0++;
            }
        }
        if( max_0 > max_0_b )
        {
            str_0 = i;
            max_0_b = max_0;
        }
    }
 
    //Само рекурсивное разложение по строке
    int result = 0;
 
    for( int j = 0; j < size; j++ )
    {
        if( matrix[ str_0 ][ j ] )
        {
            result += matrix[ str_0 ][ j ] * ( unsigned )pow( -1.f, ( unsigned )j ) * FIND_Det( FIND_Minor( matrix, size, str_0, j ), size - 1 );
 
        }
    }
 
    return result;
}
 
 
 //  int column_of_coefficients[ size ];
 //   for( int i = 0; i < size; i++ )
   // {
     //    column_of_coe for( int j = 0; j < size; j++ )w
 
 
 
 
 
 
 
int main()
{
    srand( ( unsigned )time(0) );
 
    float begin,end;
 
 
    int size;
    int det[ size ];
 
    cout << "Input size: "<< endl;
    cin >> size;
    int **matrix = new int*[ size ];
 
    char sw;
    cout << "\n1Avtomaticly plenum - \n2Manual plenum - \n";
    cin >> sw;
 
    switch( sw )
    {
    case '1':
        cout << "\nMatrix:\n";
        for( int i = 0; i < size; i++ )
        {
            matrix[ i ] = new int[ size ];
            for( int j = 0; j < size; j++ )
            {
                matrix[ i ][ j ] = rand()%10;
                cout << matrix[ i ][ j ] << " ";
            }
            cout << "\n";
        }
        break;
 
    case '2':
        cout << "\nYour Matrix:\n";
        for( int i = 0; i < size; i++ )
        {
            matrix[ i ] = new int[ size ];
            for( int j = 0; j < size; j++ )
            {
                cin >> matrix[ i ][ j ];
            }
        }
        break;
 
    default:
        cout << "\n";
        return 0;
    }
 
// Создаю двумерный массив и оттождествляю его с данной матрицей, чтобы потом использовать в замене столбцов.
    int col_of_coeffic[ size ][ size ];
    for ( int i = 0; i < size; i ++)
    {
      for ( int j = 0; j < size; j ++)
      {
          col_of_coeffic[ i ][ j ] = matrix[ i ][ j ] ;
        }
    }
// Создаю рандомный столбец решений СЛАУ, его я буду переставлять, дабы находить определители по методу Крамера.
  int column_of_coefficients[ size ];
  for( int i = 0; i < size; i++ )
  {
       column_of_coefficients[ i ] = rand()%10;
       cout <<  column_of_coefficients[ i ] << endl;
  }
        for ( int j = 0; j < size; j ++)
        {
 
         for ( int i = 0; i < size; i++ )
          {
             for ( int j = 0; j < size; j ++)
             {
// Собственно, вот и сама перестановка.
                 matrix[ i ][ j ] = column_of_coefficients[ i ] ;
             }
 
// Нахожу и-тый определитель, затем все повторяю, заменив матрицу на прежнюю.
         det [ i ] = FIND_Det( matrix, size ) ;
             matrix[ i ][ j ] = col_of_coeffic[ i ][ j ];
        }
      }
 
 // cout << "column solutions : " << endl;
     int X[ size ];
// Самая последняя часть - ввожу пустой одномерный вертикальный массив, заполняю его по формуле - Δi / Δ 
 
       for ( int i = 0; i < size; i++ )
       {
          X[ i ] = det [ i ] / FIND_Det( matrix, size );
       }
    for ( int i = 0; i < size; i++ )
       {
          cout << X[ i ] << endl;
        }
// Вывожу его и определитель исходной рандомной матрицы.
    cout << "\nDeterminate= ";
    begin = clock();
    cout << FIND_Det( matrix, size ) << endl;
    end = clock();
 
    cout << "\nTime  - ";
    cout << ( end - begin ) / 1000 << " seconds" << endl;
 
    return 0 ;
}
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
14.06.2013, 03:28
Ответы с готовыми решениями:

Решение СЛАУ методом Крамера
Доброго времени суток! Пишу курсовую по методу Крамера. Вроде ничего сложного, но программированием я занимаюсь не часто, скачал с нета...

Утечка памяти (решение СЛАУ методом Крамера, матрицы, malloc)
Раньше программировал на C#/Java (а как следствие и расхлябанность по отношению к памяти), сейчас пытаюсь осилить C++. Более-менее понял...

СЛАУ методом Крамера
Здравствуйте! Пишу программу для решения СЛАУ методом Крамера (максимум 4 системы за раз). #include&lt;iostream&gt; ...

0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
14.06.2013, 03:28
Помогаю со студенческими работами здесь

Решение матрицы методом Крамера
доброго времени суток. Задали написать программу для решения матрицы методом крамера. Нашел уже готовый код тут на форуме но у него нету...

Решение системы линейных уравнений методом Крамера
Написать программу решения системы линейных уравнений методом Крамера. Количество переменных до 20. Программа должна выводить результаты...

Написать решение систем линейных уравнений методом Крамера
Требуеться написать решение систем линейных уравнений методом крамера. Входные данные беруться с файла или с клавиатуры(выбирает...

Решение СЛАУ методом отражений
Всем привет. Задали писать курсач. Нужно реализовать метод отражения. Предусмотреть ввод числа уравнений, матрицы коэффициентов и вектора...

Решение СЛАУ методом прогонки
Добрый день,нужно решить СЛАУ методом прогонки,вот СЛАУ и ее решение. коэфф перед х1считается как за а1. перед х2считается...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Опции темы

Новые блоги и статьи
Модель микоризы: классовый агентный подход 3
anaschu 06.01.2026
aa0a7f55b50dd51c5ec569d2d10c54f6/ O1rJuneU_ls https:/ / vkvideo. ru/ video-115721503_456239114
Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR
ФедосеевПавел 06.01.2026
Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ВВЕДЕНИЕ Введу сокращения: аналоговый ПИД — ПИД регулятор с управляющим выходом в виде числа в диапазоне от 0% до. . .
Модель микоризы: классовый агентный подход 2
anaschu 06.01.2026
репозиторий https:/ / github. com/ shumilovas/ fungi ветка по-частям. коммит Create переделка под биомассу. txt вход sc, но sm считается внутри мицелия. кстати, обьем тоже должен там считаться. . . .
Расчёт токов в цепи постоянного тока
igorrr37 05.01.2026
/ * Дана цепь постоянного тока с сопротивлениями и напряжениями. Надо найти токи в ветвях. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа и решает её. Последовательность действий:. . .
Новый CodeBlocs. Версия 25.03
palva 04.01.2026
Оказывается, недавно вышла новая версия CodeBlocks за номером 25. 03. Когда-то давно я возился с только что вышедшей тогда версией 20. 03. С тех пор я давно снёс всё с компьютера и забыл. Теперь. . .
Модель микоризы: классовый агентный подход
anaschu 02.01.2026
Раньше это было два гриба и бактерия. Теперь три гриба, растение. И на уровне агентов добавится между грибами или бактериями взаимодействий. До того я пробовал подход через многомерные массивы,. . .
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост.
Programma_Boinc 28.12.2025
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / **********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / **********/ gallery/ bKBkQFf Пост отсюда. . .
Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США.
Programma_Boinc 26.12.2025
Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru