Курсовая работа: Итерационные методы решения систем линейных алгебраических уравнений

{

s+=B[i] [j]*X[i];

}

X[i]=s+C[i];

s=0;

}

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

{

if (fabs(X[i] – Y[i])<e) prov++;

}

k++;

}

while (prov!=n);

Memo1->Lines->Add (» МЕТОД ЯКОБИ »);

Memo1->Lines->Add(«»);

String p=»»;

Memo1->Lines->Add («Промежуточная матрица:»);

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

{

p=»»;

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

{

p+=FloatToStr (B[i] [j])+»»;

}

Memo1->Lines->Add(p);

}

Memo1->Lines->Add(«»);

Memo1->Lines->Add (« Корни СЛАУ равны :»);

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