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

{

Memo1->Lines->Clear();

k=0;

TryStrToInt (Edit1->Text, n);

if (n>1)

{

StringGrid1->Enabled=true;

StringGrid1->RowCount=n;

StringGrid1->ColCount=n+1;

ButtonClear->Enabled=true;

ButtonOk->Enabled=false;

StringGrid1->Color=clWindow;

ButtonYakobi->Enabled=true;

ButtonZeydel->Enabled=true;

ButtonRelax->Enabled=true;

X=new float[n];

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

{

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

{

A[i] [j]=NULL;

}

X[i]=NULL;

}

}

else

{

ShowMessage («Число должно быть вещественного типа!»);

}