Контрольная работа: Предметна область системного аналізу Основні поняття системного аналізу

}}}}//---------------

//=======================================

int p1,p2,p3;

void run_5()

p1=-1;

AnsiString f="m("+IntToStr(P[0].z)+","+IntToStr(P[1].z)+","+IntToStr(P[2].z)+","+IntToStr(P[3].z)+")";

Form1->TreeView1->Items->Clear(); Form2->TreeView1->Items->Clear();

Form1->TreeView1->Items->Add(NULL,f); Form2->TreeView1->Items->Add(NULL,f);

Form1->TreeView1->Items->Item[0]->Text=f;

Form2->TreeView1->Items->Item[0]->Text=f;

kpk();

for(int i=n-1; i>-1; i--)

{b=1; T[i].z=0; p1++; p2=-1;

if(!Form1->CheckBox2->Checked) t1=p1; else t1=i;

P[0].z=ccc[0];

P[1].z=ccc[1];

P[2].z=ccc[2];

P[3].z=ccc[3];

spp(p1);

AnsiString f="t"+IntToStr(p1+1)+"("+IntToStr(P[0].z)+","+IntToStr(P[1].z)+","+IntToStr(P[2].z)+","+IntToStr(P[3].z)+")";

if(ccc[0]!=P[0].z||ccc[1]!=P[1].z||ccc[2]!=P[2].z||ccc[3]!=P[3].z)

{

Form1->TreeView1->Items->Item[0]->Item[t1]->Text=f;

Form2->TreeView1->Items->Item[0]->Item[t1]->Text=f;

cc[0]=P[0].z;

cc[1]=P[1].z;

cc[2]=P[2].z;

cc[3]=P[3].z;

}

К-во Просмотров: 257
Бесплатно скачать Контрольная работа: Предметна область системного аналізу Основні поняття системного аналізу