ислюються самі рішення системи лінійних алгебраїчних рівнянь.
-23 - введення масиву струмів в гілках ланцюга.
-27 - визначення потужностей джерел і навантаження з отриманих даних.
-30 - висновок значень струмів в гілках ланцюга на екран і в файл.
-32 - висновок значень потужностей на екран і в файл.
-35 - перевірка на баланс потужностей і висновок відповіді.
5. Характеристика даних та їх умова позначення
№ п п Найменування даннихОбозначеніе в блок-схемеОбозначеніе в программеТіп переменних01Коеффіціенти сістемиaadouble ** 02Свободние члениbbdouble * 03Потенціалиxxdouble * 04Первое сопротівленіеR1 Rdouble * 05Второе сопротівленіеR2double * 06Третье сопротівленіеR3double * 07Четвертое сопротівленіеR4double * 08Пятое сопротівленіеR5double * 09Шестое сопротівленіеR6double * 10Первий токI1 Idouble * 11Второй токI2double * 12Третій токI3double * 13Четвертий токI4double * 14Пятий токI5double * 15Шестой источниковPnagrPnagrdouble20Мощность елементmaxmaxdouble25Колічество елементовnNint26Колічество елементовmMint27Входной потокFFПоток28Виходной потокffПоток
6. Текст програми
Текст програми на Microsoft Visual C + + 6.0:
# include "stdafx.h"
# include
# include
# include
# include SLAU (double ** matrica_a, int n, double * massiv_b, double * x)
{i, j, k, r; c, M, max, s, ** a, * b; = new double * [n]; (i = 0; i {= fabs (a [k] [k]); = k; (i = k +1; i max)
{= fabs (a [i] [k]); = i;
} (j = 0; j
{= a [k] [j]; [k] [j] = a [r] [j]; [r] [j] = c;
} = b [k]; [k] = b [r]; [r] = c; (i = k +1; i
{(M = a [i] [k]/a [k] [k], j = k; j
}
} (a [n-1] [n-1] == 0) (b [n-1] == 0) -1; return -2;
{(i = n-1; i> = 0; i -)
{(s = 0, j = i +1; j
} 0;
} (i = 0; i
} main ()
{F; f; result, i, N = 3, M = 5, p; ** a, * b, * x, * R, E2, E4, Ik1, * I, S , Pist, Pnagr; = new double * [N]; = new double [M]; (i = 0; i
