Zahiriddin muhammad bobur nomidagi andijon davlat universiteti



tải về 0.79 Mb.
trang15/27
Chuyển đổi dữ liệu01.03.2024
Kích0.79 Mb.
#56678
1   ...   11   12   13   14   15   16   17   18   ...   27
Zahiriddin muhammad bobur nomidagi andijon davlat universiteti

:Array[o’lcham] of ;
Masalan:
A,B:Array[1..100] of real;
C,A1,D:Array[1..10,1,,15] of real;
Bu yerda A va B massivlari 100tadan elementga ega. C,A1,D1 massivlari esa 10x15=150 tadan elementga ega.
Massivlarni e’lon qilishdan maqsad massiv elementlari uchun kompyuter xotirasidan joy ajratishdir.
Massiv elementlari qiymatlarini kiritish uchun sikl operatorlaridan foydalaniladi.
Misol: For i:=1 to 10 do Read(A[i]);
Bu misolda A massivning 10 ta elementi qiymatini ekrandan ketma-ket kiritish kerak bo’ladi. Xuddi shunday massiv qiymatlarini ekranga chiqarish ham mumkin.
Misol: For i:=1 to 10 do Write(A[i]);
Dasturda massiv elementlarini ishlatganda ularning indeksi e’lon qilingan chegaradan chiqib ketmasligi kerak.
Massiv elementlarini tartiblash usullari.
Massivni tartiblashtirishning bir necha usullari (algoritmlari) mavjud. Ulardan quyidagi usullarni qarab chiqamiz:
-tanlash usuli;
-almashtirish usuli.
Tanlash usuli yordamida massivni o’sish bo’yicha tartiblashtirish algoritmi quyidagicha:
1.Massivning birinchi elementidan boshlab qarab chiqilib eng kichik element topiladi.
2.Birinchi element bilan eng kichik element joylari almashtiriladi.
3.Ikkinchi elementidan boshlab qarab chiqilib eng kichik element topiladi.
4.Ikkinchi element bilan eng kichik element joylari almashtiriladi.
5.Bu protsess bitta oxirgi elementgacha takrorlanadi.
Bu algoritm dastursi quyidagicha bo’ladi:
Program Sort;
Const Size=5;
Var i,j,min,k,buf: Integer;
a: Array[1..Size] of Integer;
Begin
Writeln (‘Massivni tartiblashtirish’);
Write (Size:3,’ta massiv elementini kiriting’);
For k:=1 to Size Do Read(a[k]);
Writeln (‘Tartiblashtirish’);
For i:=1 to Size-1 Do
Begin
{ kichik elementni topish }

tải về 0.79 Mb.

Chia sẻ với bạn bè của bạn:
1   ...   11   12   13   14   15   16   17   18   ...   27




Cơ sở dữ liệu được bảo vệ bởi bản quyền ©hocday.com 2024
được sử dụng cho việc quản lý

    Quê hương