Курсовая работа: Решение систем нелинейных уравнений методом Бройдена

{ X[N - 1] = B[N - 1] / A[N - 1, N - 1]; }

else X[N - 1] = 0;

double SYM = 0;

int l = N - 2;

for (int i = N - 2; i >= 0; i--)

{

SYM = 0;

for (int j = i + 1; j <= N - 1; j++)

{

SYM = SYM + A[i, j] * X[j];

}

if (A[i, l] != 0)

{ X[i] = (B[i] - SYM) / A[i, l]; }

else X[i] = 0;

l--;

}

double[] XJ = new double[N];

double promq = 0; double mq = 0; double nq = 0;

S = 0;

for (int i = 0; i < N; i++)

{

XJ[i] = V[i] + X[i];

if (X[i] >= 0)

{ promq = X[i] + promq; }

else {promq = -X[i] + promq; }

if (V[i] >= 0)

{ mq = mq + V[i]; }

else

{ mq = mq - V[i]; }