Реферат: Точные методы решения систем линейных алгебраических уравнений (СЛАУ)
}
if (i>j)
{
Ver [i] [j] =0;
}
}
}
for (int i=1; i<n; i++)
{
Ver [i] [i] =1;
}
for (int i=1; i<n; i++)
{
for (int j=i; j<n; j++)
{
for (int k=0; k<i; k++)
{
p=p+Nig [j] [k] *Ver [k] [i] ;
}
Nig [j] [i] =A [j] [i] -p;
p=0;
}
for (int j=i+1; j<n; j++)
{
for (int k=0; k<i; k++)
{
p=p+Nig [i] [k] *Ver [k] [j] ;
}
Ver [i] [j] =1/Nig [i] [i] * (A [i] [j] -p);