O’zbekiston respublikasi axborot texnologiyalari va kommunikatsiyalarini

Dastur kodi: #include #pragma hdrstop
#include "Unit1.h"


//---------------------------------------------------------------------------#pragma package(smart_init)
#pragma resource "*.dfm" TForm1 *Form1;
//---------------------------------------------------------------------------__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner) {
}


//---------------------------------------------------------------------------const Nmax=10;
typedef double mas2[Nmax][Nmax]; typedef double mas1[Nmax];
int N=3;

void __fastcall TForm1::FormCreate(TObject *Sender) {

Edit1->Text=FloatToStr(N);

StringGrid1->ColCount=N+1; StringGrid1->RowCount=N+1; StringGrid2->RowCount=N+1; StringGrid3->RowCount=N+1; StringGrid1->Cells[0][0]="MassivA"; StringGrid2->Cells[0][0]="Massiv B"; StringGrid3->Cells[0][0]="Massiv Y"; for(int i=1; i<=N; i++)

{

StringGrid1->Cells[0][i]="i="+IntToStr(i); StringGrid1->Cells[i][0]="j="+IntToStr(i); }

}


//---------------------------------------------------------------------------void __fastcall TForm1::Button1Click(TObject *Sender)
{


N=StrToInt(Edit1->Text); StringGrid1->ColCount=N+1; StringGrid1->RowCount=N+1; StringGrid2->RowCount=N+1; StringGrid3->RowCount=N+1; StringGrid1->Cells[0][0]="MassivA";
StringGrid2->Cells[0][0]="Massiv B"; StringGrid3->Cells[0][0]="Massiv Y"; for(int i=1; i<=N;i++)
{

StringGrid1->Cells[0][i]="i="+IntToStr(i); StringGrid1->Cells[i][0]="j="+IntToStr(i); }

}

//---------------------------------------------------------------------------void __fastcall TForm1::BitBtn1Click(TObject *Sender)
{


mas2 a; mas1 b,y; int i,j;
for(i=0; ia[i][j]=StrToFloat(StringGrid1->Cells[i+1][j+1]); for( i=0; ib[i]=StrToFloat(StringGrid2->Cells[0][i+1]); for( i=0; i{

double s=0;

for( j=0; j
StringGrid3->Cells[0][i+1]=FloatToStrF(y[i],ffFixed,8,2); }
}