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

double *E

5

Сила тока I

x

x

double *x

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

#include «stdafx.h»

#include <iostream.h>

#include <fstream.h>

#include <math.h>

#include <iomanip.h>

#include <stdlib.h>

#include <malloc.h>

int SLAU (double **matrica_a, int n, double *massiv_b, double *x)

// Функция SLAU возвращает значение типа int: 0, если решение найдено, // -1 если система имеет бесконечное множество решений, -2 если // система не имеет решений. Параметры ф-ии: n-размерность матрицы, //matrica_a – матрица коэффициентов СЛАУ, massiv_b – вектор правых // частей, х – решение СЛАУ.

{

int i, j, k, r;

double c, M, max, s, **a, *b;

// Выделение памяти для а и b.

a=new double *[n];

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

a[i]=new double[n];

b=new double [n];

// В а записываем копию матрицы, в b копию вектора правых частей.

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

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

a[i] [j]=matrica_a[i] [j];

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