|
21-mavzu: Dasturlash tilining asosiy konstruktsiyalari, ulardan foydalanish xususiyatlari reja
|
| bet | 5/5 | | Sana | 16.01.2024 | | Hajmi | 198,97 Kb. | | #138801 |
Bog'liq 21- lectures Basic prog Massiv 2-mavzu, 10-Mavzu Adobe Photoshop dasturida fayllar bilan ishlash, instumen, Био,физ,кимё лаб., 10-ma\'ruza, Tolstosheeva Razrabotka 17 (1), 4-маъруза такдимоти, 1-maruza (3), photo 2023-09-20 16-09-55, portal.guldu.uz-Maruza (1), File, 20-ma\'ruza rekursiv funksiyalar, 0102, 16-ma\'ruza, 7-mavzu media maydon tuzilishi va ta`siri. Reja Axborotlashgan, B.BAhmedovint n;
n=StrToInt(Edit1->Text );
StringGrid1->Cells[0][0]="A massiv" ;
StringGrid2->Cells[0][0]="B massiv" ;
StringGrid1->ColCount =n+1;
StringGrid2->ColCount =n+1;
Endi Button2 ning onClick xossasiga quyidagi kodni kiritamiz.
int n,c;
n=StrToInt(Edit1->Text );
int a[100];
for (int i=1;i<=n;i++)
a[i]=StrToInt(StringGrid1->Cells [i][0]);
for (int k=1;k<=n;k++)
for(int i=1;i<=n-1;i++)
if (a[i]>a[i+1])
{ c=a[i];
a[i]=a[i+1];
a[i+1]=c ;
};
for (int i=1;i<=n;i++)
StringGrid2->Cells [i][0]=IntToStr(a[i]) ;
Endi dasturni ishlatish uchun “Run” menyusining “Run” buyrig’ini yoki klaviaturadan F9 klavishini bosib ishgatushirishimiz mumkin. Shunda bizga quyidagicha oyna xosil bo’ladi.
Bu dasturni ishlatish uchun avval n ga qiymat berib “Massivni shakllantirish“ buyrug’i orqali massivni shakllantirib so’ngra massivni qiymatini berib “tartiblash” buytug’ini tanlaymiz. Masalan:
|
| |
