Pagini recente » Istoria paginii runda/ada6/clasament | Monitorul de evaluare | Cod sursa (job #1400564) | Cod sursa (job #1531129) | Cod sursa (job #2893442)
// This program was written on 25.04.2022
// for problem gauss
// by Mircea Rebengiuc
#include <stdio.h>
#include <ctype.h>
#include <valarray>
#define EPS 1e-7
#define MAXN 300
#define MAXM 300
std::valarray<double> e[MAXN];
double rez[MAXM];
inline bool null( const double &t ){
return std::abs( t ) <= EPS;
}
FILE *fin, *fout;
int main(){
fin = fopen( "gauss.in", "r" );
fout = fopen( "gauss.out", "w" );
int n, m, i, j, k;
fscanf( fin, "%d%d", &n, &m );
for( i = 0 ; i < n ; i++ ){
e[i].resize( m + 1 );
for( j = 0 ; j <= m ; j++ )
fscanf( fin, "%lf", &e[i][j] );
}
for( i = j = 0 ; i < n && j < m ; j++ ){
if( null( e[i][j] ) ){// nu avem variabila 'dominanta'
// gasim alta ecuatie cu coeficient nenul
k = i + 1;
while( k < n && null( e[k][j] ) )
k++;
if( k < n )
std::swap( e[i], e[k] );// O(1)
}
if( !null( e[i][j] ) ){
// facem toti coeficientii de la variabila j nuli
for( k = 0 ; k < n ; k++ )
if( k != i && !null( e[k][j] ) )
e[k] -= e[i] * (e[k][j] / e[i][j]);
i++;
}
}
// scoatem variabilele din matrice
for( i = 0 ; i < n ; i++ ){
j = 0;
while( j < m && null( e[i][j] ) )
j++;
if( j < m )
rez[j] = e[i][m] / e[i][j];
}
for( j = 0 ; j < m ; j++ )
fprintf( fout, "%.10lf ", rez[j] );
fputc( '\n', fout );
fclose( fin );
fclose( fout );
return 0;
}