Нужна просто внимательность, я вас всех очень прошу!

//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
#include "Unit6.h"
#include <stdlib.h>
#include <stdio.h>
#include <conio.h>
#include <math.h>
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm6 *Form6;
 
class matr
{ int i,j,n;
  float aa[10][10],a[10][10],b[10],x[10];
 
 public:
 void Vvod(int n1,int kod);
 void PryamoiHod(void);
 void ObratniHod(void);
 };
 void matr::Vvod(int n1,int kod)
 
{n=n1;
for(i=0;i<n;i++)
   for(j=0;j<n+1;j++)
   if(kod==1) {a[i][j]=StrToFloat(Form6->StringGrid1->Cells[j+1][i+1]);
                      aa[i][j]=a[i][j];
                  }
  for(i=0;i<n;i++)
   b[i]=a[i][n];
   if(kod==1) Form6->Memo1->Lines->Add("Введення матриці A виконано");
}
 
 void matr::PryamoiHod(void)
 {
        float v;
        int k,im;
        for(k=0; k<n-1; k++)
        {
                im=k;
                for(i=k+1;i<n;i++)
                 if(fabs(aa[im][k]) < fabs(aa[i][k]))  im=i;
                if(im!=k)
                {
                        for(j=0; j<n; j++)
                        {
                                v=aa[im][j];
                                aa[im][j]=aa[k][j];
                                aa[k][j]=v;
                        }
                        v=b[im];
                        b[im]=b[k];
                        b[k]=v;
                }
                for(i=k+1; i<n; i++)
                {
                        v= 1.0*aa[i][k]/aa[k][k];
                        aa[i][k]=0;
                        b[i]= b[i]-v*b[k];
                        if(v!=0)
                        for(j=k+1; j<n; j++)
                        {
                                aa[i][j]=aa[i][j]-v*aa[k][j];
                        }
                }
        }
}
 void matr::ObratniHod(void)
 {
        int s=0;
        x[n-1]=b[n-1]/aa[n-1][n-1];
        for(int i=n-2, j; 0<=i; i--)
        {
                s=0;
                for(j=i+1; j<n; j++)
                {
                        s=s+aa[i][j]*x[j];
                }
                x[i]=1.0*(b[i]-s)/aa[i][i];
                Form6->Memo1->Lines->Add("X["+IntToStr(i+1)+"]="+FloatToStr(x[i+1]));
        }
}
 matr Cm;
int nn,kod1=1 ;
 
//---------------------------------------------------------------------------
__fastcall TForm6::TForm6(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm6::Button1Click(TObject *Sender)
{
 int  j;
nn=StrToInt(Edit1->Text);
  StringGrid1->ColCount=nn+2;
  StringGrid1->RowCount=nn+1;
  StringGrid1->FixedCols=1;
  StringGrid1->FixedRows=1;
  StringGrid1->Cells[0][0]="№";
  for(int i=0;i<nn;i++)
  StringGrid1->Cells[0][i+1]=IntToStr(i+1)+" рівняння";
  for(int j=0;j<nn;j++)
  StringGrid1->Cells[j+1][0]="X"+IntToStr(j+1);
  if(j=nn) StringGrid1->Cells[j+1][0]="В-дь:";
  Memo1->Clear();
  StringGrid1->Visible=true;
  Button4->Visible=true;
}
//---------------------------------------------------------------------------
void __fastcall TForm6::Button2Click(TObject *Sender)
{
Cm.ObratniHod();
 
}
//---------------------------------------------------------------------------
void __fastcall TForm6::Button4Click(TObject *Sender)
{
 
 Cm.Vvod(nn,kod1);
 Button2->Visible=true;
 Memo1->Visible=true;
}
//---------------------------------------------------------------------------
void __fastcall TForm6::Button3Click(TObject *Sender)
{
Close();
}
//---------------------------------------------------------------------------
void __fastcall TForm6::FormCreate(TObject *Sender)
{
AutoSize = false;
   Image1->Stretch = true;
   Edit1->Clear();
   Memo1->Clear();
}
//---------------------------------------------------------------------------
 
 
void __fastcall TForm6::Button5Click(TObject *Sender)
{
 Form1->Show();
 Form6->Hide();
}
//---------------------------------------------------------------------------

void matr::ObratniHod(void)
 {
        int s=0;
        x[n-1]=b[n-1]/aa[n-1][n-1]; //где выводится вот это вот значение?
        for(int i=n-2, j; 0<=i; i--) //в этом цикле оно не выводится
        {
                s=0;
                for(j=i+1; j<n; j++)
                {
                        s=s+aa[i][j]*x[j];
                }
                x[i]=1.0*(b[i]-s)/aa[i][i];
                Form6->Memo1->Lines->Add("X["+IntToStr(i+1)+"]="+FloatToStr(x[i+1])); //а может и выводится, но тогда не выводится x[0] так как количество итераций цикла на 1 меньше чем нужно
        }
}