تعلم برمجة Pascal الدرس السابع - المصفوفات

المصفوفات احد انواع المتغيرات , ما يميز المصفوفات عن باقي المتغيرات انه يمكنها تخزين اكثر من قيمه في متغير واحد .

المصفوفات تعرّف غالباً مثل طريقة تعريف المتغيرات و لكن يجب ان تذكر عدد البيانات التي سوف يتم تخزينها .


شيفره برمجيه :

program Arrays;

var
a: array[1..5] of Integer;

begin
end.




يمكننا ان نصل إلى كل العناصر بإستخدام اسم المتغير و من ثم وضع رقم العنصر بين القوسين []


شيفره برمجيه :

program Arrays;

var
a: array[1..5] of Integer;

begin
a[1] := 12;
a[2] := 23;
a[3] := 34;
a[4] := 45;
a[5] := 56;
end.




لسهوله اكثر في استدعاء المصفوفات للقرائه استخدام التكرار لكي يتم قرائة الخمس عناصر من خلال سطر واحد .


شيفره برمجيه :

program Arrays;

var
a: array[1..5] of Integer;
i: Integer;

begin
for i := 1 to 5 do
Readln(a);
end.




تصنيف المصفوفات :
احياناً قد تريد ترتيب قيم المصفوفات بطريقه معينه . لعمل ذلك يمكنك استخدام تصنيف bubble . تصنيف bubble واحده من الطرق الكثيره لتصنيف المصفوفات و هو الاكثر شعبيه . في تصنيف bubble اكبر اعداد ينتقلون إلى آخر المصفوفه .


شيفره برمجيه :

program Arrays;

var
a: array[1..5] of Integer;
i, j, tmp: Integer;

begin
a[1] := 23;
a[2] := 45;
a[3] := 12;
a[4] := 56;
a[5] := 34;
for i := 1 to 4 do
for j := 2 to 5
if a[j] > a[j + 1] then
begin
tmp := a[j];
a[j] := a[j + 1];
a[j + 1] := tmp;
end
end.




مصفوفات 2D :
يمكن ان يكون لدى المصفوفات بعدان بدلاً من واحد , او بعباره اخرى يمكن ان يكون لديهم صفوف و اعمده بدلاً من صفوف فقط .


شيفره برمجيه :

program Arrays;

var
a: array [1..3,1..3] of Integer;

begin
end.




للوصول إلى القيم يجب ان تستخدم اسم المتغير ثم عددين بين الاقواس [] .


شيفره برمجيه :

program Arrays;

var
r, c: Integer;
a: array [1..3,1..3] of Integer;

begin
for r := 1 to 3 do
for c := 1 to 3 do
Readln(a[r,c]);
end