Программалау технологиясы

if 
(a[i]>max) max=a[i]; 
} 
Edit2->Text=FloatToStrF(max,ffFixed,5,2); 
} 
if 
(CheckBox2->Checked == True) //min элементті табу 
{
for
(
int 
i=0;iif 
(a[i]Edit3->Text=FloatToStrF(min,ffFixed,5,2); 
} 
if 
(CheckBox3->Checked == True)
// массивті ӛсу ретімен сұрыптау 
for
(
int 
i=0;i{ max=a[i]; 
int 
Nmax=i; 
for
(
int 
j=i;jif 
(a[j]>max) {max=a[j]; Nmax=j;} 
a[Nmax]=a[i]; a[i]=max; 
Memo2->Lines->Add("a["+Int
ToStr(i)+"]= "+FloatToStrF(max,ffFixed,5,2)); } 
} 
//------
Массивті толтыру
батырмасының коды----------- 
void __fastcall 
TForm1::Button2Click(TObject *Sender)
{ 
if 
(Edit1->Text=="") 
{ShowMessage("Massiv elementterinin sanin beriniz"); 
Edit1->SetFocus();} 
Elem_sani=StrToInt (Edit1->Text); 

жүктеу/скачать 2,48 Mb.

Достарыңызбен бөлісу: