Форум программистов, компьютерный форум, киберфорум
C для начинающих
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
0 / 0 / 0
Регистрация: 06.03.2014
Сообщений: 39
1

Разбить программу решения СЛАУ методом Гаусса на функции

04.04.2016, 17:28. Показов 465. Ответов 0
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Написал программу, для решения СЛАУ методом Гаусса.
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
#include <stdio.h>
#include <math.h>
#include <Windows.h>
 
int main()
{
    SetConsoleCP(1251);
    SetConsoleOutputCP(1251);
int n, i, j, k;
double d, s;
printf( "Введите число уравнений системы : \n" );
    scanf( "%d", & n );
double a[n][n];
double b[n];
double x[n];
printf("Введите матрицу коэфициентов (a[]) и свободных членов (b[])");
for ( i = 1; i <= n; i++ )
{
    printf("\n");
for ( j = 1; j <= n ; j++ )
    {
 
       printf( "a[%d][%d] = ",i,j);
 
       scanf( "%lf", & a[i][j] );
    }
 printf( "b[%d] = ",i);
scanf("%lf",&b[i]);
}
printf("\n");
printf("Получившаяся матрица : \n");
for ( i = 1; i <= n; i++ )
{
for ( j = 1; j <= n ; j++ )
    printf( "%.2f ",a[i][j]);
    printf("  ");
    printf( "%.2f",b[i]);
printf("\n");
}
////////////////////////////////////////////////////////////////////////////////////
 
 
for (k = 1; k <= n; k++) // прямой ход
{
for (j = k + 1; j <= n; j++)
{
d = a[j][k] / a[k][k]; // формула (1)
for (i = k; i <= n; i++)
{
a[j][i] = a[j][i] - d * a[k][i]; // формула (2)
}
b[j] = b[j] - d * b[k]; // формула (3)
}
}
printf("\n");
for ( i = 1; i <= n; i++ )
{
for ( j = 1; j <= n ; j++ )
    printf( "%.2f ",a[i][j]);
    printf("  ");
    printf( "%.2f",b[i]);
printf("\n");
 
}
////////////////////////////////////////////////////////////////////////
 
 
for (k = n; k >= 1; k--) // обратный ход
{
d = 0;
for (j = k + 1; j <= n; j++)
{
s = a[k][j] * x[j]; // формула (4)
d = d + s; // формула (4)
}
x[k] = (b[k] - d) / a[k][k]; // формула (4)
}
printf("Корни системы: \n");
for( i = 1; i <= n; i++)
printf("x[%d] = %.2f\n",i,x[i]);
return 0;
}
начал разбивать на функции и пошло поехало, для 2 уравнений работает, а для 3 и больше вылетает. Вот еще мои труды.
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
#include <stdio.h>
#include <math.h>
#include <Windows.h>
void Showmatrix(int n,double a[n][n],double *b)
{
    int i,j;
    for ( i = 1; i <= n; i++ )
    {
    for ( j = 1; j <= n ; j++ )
    printf( "%.2f ",a[i][j]);
    printf("  ");
    printf( "%.2f",b[i]);
    printf("\n");
}
}
void PryamoiHod(int n, double a[n][n], double *b)
{
    int k,j,i;
    double d;
for (k = 1; k <= n; k++) // прямой ход
{
    if ( fabs( a[k] [k] ) == 0 )
    {
      printf( "Система не имеет единственного решения \n" );
 
    }
for (j = k + 1; j <= n; j++)
{
d = a[j][k] / a[k][k]; // формула (1)
for (i = 1; i <= n; i++)
{
a[j][i] = a[j][i] - d * a[k][i]; // формула (2)
}
b[j] = b[j] - d * b[k]; // формула (3)
}
}
}
 
void ObratniHod(int n, double a[n][n], double *b,double *x)
{
     int k,j;
    double d,s;
for (k = n; k >= 1; k--) // обратный ход
{
d = 0;
for (j = k + 1; j <= n; j++)
{
s = a[k][j] * x[j]; // формула (4)
d = d + s; // формула (4)
}
x[k] = (b[k] - d) / a[k][k]; // формула (4)
}
}
int main()
{
    SetConsoleCP(1251);
    SetConsoleOutputCP(1251);
int n, i, j;
 
printf( "Введите число уравнений системы : \n" );
    scanf( "%d", & n );
     printf("\n");
double a[n][n];
double b[n];
double x[n];
printf("Введите матрицу коэфициентов (a[]) и свободных членов (b[])\n");
for ( i = 1; i <= n; i++ )
{
    printf("\n");
for ( j = 1; j <= n ; j++ )
    {
 
 
       printf( "a[%d][%d] = ",i,j);
a[i][j]=-10+rand()%10;
       //scanf( "%lf", & a[i][j] );
    }
 printf( "b[%d] = ",i);
scanf("%lf",&b[i]);
}
printf("\n");
printf("Получившаяся матрица : \n\n");
Showmatrix(n,a,b);
printf("\n");
PryamoiHod(n,a,b);
printf("Полученная треугольная матрица: \n\n");
Showmatrix(n,a,b);
ObratniHod(n,a,b,x);
printf("Корни системы: \n");
for( i = 1; i <= n; i++)
printf("x[%d] = %.2f\n",i,x[i]);
return 0;
}
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
04.04.2016, 17:28
Ответы с готовыми решениями:

Разработать программу для решения СЛАУ методом Гаусса
Разработать программу для решения СЛАУ методом Гаусса есть код, но во первых он не работает во...

Реализация алгоритма решения СЛАУ методом Гаусса
Попрошу помочь в реализации алгоритма решения СЛАУ методом Гаусса на языке С (НЕ C++!). Заранее...

Ошибка в программе для решения СЛАУ методом Гаусса
Здравствуйте помогите пожалуйста! Не могу найти ошибку в программе :( Алгоритм такой: среди...

Написать программу которая находит решение СЛАУ методом Гаусса
Помогите найти ошибку в коде. Нужно написать программу которая находит решение СЛАУ методом...

0
04.04.2016, 17:28
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
04.04.2016, 17:28
Помогаю со студенческими работами здесь

Улучшить программу для решения уравнения методом Гаусса
В общем, есть код для обычного решения уравнения, но мне требуется улучшить, чтобы он решал матрицу...

Нужно написать программу на СИ для решения СЛАУ методом LU разложения Краута
Нужно написать программу на СИ для решения СЛАУ с помощью Метода LU разложения Краута

Метод Гаусса решения СЛАУ
Прошу помочь с составлением программы, позволяющей решать системы линейных уравнений методом Гаусса...

Решение СЛАУ методом Гаусса
помогите, пожалуйста! надо создать программу, которая считает систему линейных уравнений методом...


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

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru