Курсовая работа: Линейные электрические цепи 2

// Обратный ход метода Гаусса.

if (a [n-1] [n-1]==0)

if (b[n-1]==0)

return -1;

else return -2;

else

{

for (i=n-1; i>=0; i–)

{

for (s=0, j=i+1; j<n; j++)

s+=a[i] [j]*x[j];

x[i]=(b[i] – s)/a[i] [i];

}

return 0;

}

// Освобождение памяти, выделенной под копии матрицы // коэффициентов, вектора правых частей.

for (i=0; i<n; i++)

delete [] a[i];

delete [] a;

delete [] b;

}

int main()

{

int result, i, N, K, L;

double **A, *B, *x, *R, *E;

ifstream f;

// Открытие текстового файла abc.txt в режиме чтения

f.open («A:\\Kurs\\abc.txt», ios:in);

N=3;