Zahiriddin muhammad bobur nomidagi andijon davlat universiteti
buf:=a[k]; a[k]:=a[k+1]; a[k+1]:=buf
tải về 0.79 Mb.
|
- Điều hướng trang này:
- Program MinMax; Var i,min: Integer; a: Array[1..10] of Integer; Begin Writeln (‘Massivdan eng kichik elementni izlash’);
- Writeln(‘Izlanayotgan eng kichik element:’,a[min]); Writeln(‘Element nomeri’,min); End. Dinamik massiv
| buf:=a[k]; a[k]:=a[k+1]; a[k+1]:=buf;
End; End; For k:=1 to Size Do Write (a[k],’ ‘); Writeln; End; Writeln(‘Massiv tartiblashtirildi.’); End. Dastur natijasi: Massivni puzirek usulida tartiblashtirish 5 ta massiv elementini kiriting 3 2 4 1 5 Tartiblashtirish 2 3 4 1 5 2 3 1 4 5 2 1 3 4 5 1 2 3 4 5 Massiv tartiblashtirildi. Massivda eng kichik yoki eng katta elementni izlash algoritmi ma’lumki birinchi element eng kichik (katta) deb olinib keyin boshka elementlar bilan ketma-ket solishtirilib chiqiladi. Solishtirilish oxirgi elementgacha bajariladi. Quyida bu algoritm dastursi keltirilgan: Program MinMax; Var i,min: Integer; a: Array[1..10] of Integer; Begin Writeln (‘Massivdan eng kichik elementni izlash’); Write (’ 10-ta massiv elementini kiriting’); For i:=1 to 10 Do Read(a[i]); min:=1; For i:=2 to 10 Do If a[i] Writeln(‘Izlanayotgan eng kichik element:’,a[min]); Writeln(‘Element nomeri’,min); End. Dinamik massiv Dinamik massiv ta’riflanganda uning uzunligini ko’rsatish shart emas. Massiv uzunligini o’rnatish uchun SetLength funksiyasidan foydalanish mumkin. Uning ikki parametri mavjud: 1. Dinamik massiv tipidagi o’zgaruvchi. 2. Massiv uzunligi. High(r) funksiyasi massiv elementlari sonini qaytaradi. Misol:
i:Integer; begin SetLength(r,10); for i:=0 to High(r)-1 do begin r[i]:=i*i; writeln (IntToStr(i)+' kvadrati ='+IntToStr(r[i])); end; IntToStr funksiyasi sonni satrga aylantiradi. Qism dasturlar Dasturlash jarayonida shunday holatlar bo’ladiki, bir xil operatorlar ketma-ketligini dasturning bir necha joylarida takroran yozishga to’g’ri keladi. Bunday takrorlanishni yo’qotish maqsadida dasturlashning ko’pgina tillarida qism dastur tushunchasi kiritilgan. Takrorlanadigan operatorlar ketma-ketligini mustaqil dastur bo’lagi -qism dastur ko’rinishida bir marotaba yoziladi va bu dastur bo’lagi kerak bo’lgan joylarda esa, unga murojaat qilinadi xalos. Paskal tilida qism dastur protsedura yoki funksiya ko’rinishida beriladi Ayrim masalalarni yechishda ma’lum parametrlarning har xil qiymatlarida bir xil hisoblashlarni bajarishga to’g’ri keladi. Bunday hollarda dastur hajmini kichiraytirish maqsadida protsedura yoki funksiyalar tashkil qilish zarur. Protsedura yoki funksiyaga murojat qilish dasturda uning nomini ko’rsatish orqali amalga oshiriladi. Kerakli parametrlar shu nomdan keyin beriladi. Protsedura yoki funksiyalar tashkil qilinganda ular dasturning bosh qismida beriladi. Ularga murojaat qilish esa dasturning asosiy qismining kerakli joyida beriladi. Asosiy dastur bilan protsedura orasida o’zgaruvchilar qiymat almashuvi formal va faktik parametrlar yordamida amalga oshiriladi. Protsedura yoki funksiyaga murojaat qilinganda boshqarilish qayerdan uzatilsa yana shu joyga qaytib keladi. Protsedura ichida yana bir necha protsedura yoki funksiya ishlatilishi mumkin. Dasturda e’lon qilingan o’zgaruvchilar, shu dasturdagi protsedura va funksiyalarga nisbatan global deyiladi. Protsedura va funksilar ichida e’lon qilingan o’zgaruvchilar lokal deyiladi. Ularning ta’sir doirasi shu protsedura va funksiyalarning ichida bo’ladi xalos. Protseduralarni e’lon qilish dasturning bosh qismida keltiriladi va u quyidagicha boshlanadi. tải về 0.79 Mb. Chia sẻ với bạn bè của bạn:
|