Ahmed1
نعتذر لكن يجب إعادة تحميل النسخة 1.9.0 مجددَا.. كما ذكرنا في سؤالكم السابق.
بالنسبة للمثال : يجب تحديد طول المصفوفة. فالدالة رتب لا تعلم طول المصفوفة مسبقا أو جعله في منطلق في الدالة الى جانب المصفوفة مصفوفة [] صحيح .
وأيضا المرجو تحويل:
اذا الفهرس_الداخلي < (طول(مصفوفة) + 1 )
الى
اذا الفهرس_الداخلي < (طول(مصفوفة) - 1_ط).
اليكم صفرة تعمل بشكل جيد:
الدالة رتب__6 (مصفوفة [6] صحيح ) {
المتغير الفهرس_الخارجي صحيح طبيعي؛
المتغير الفهرس_الداخلي صحيح طبيعي؛
لاجل الفهرس_الخارجي := 0؛ الفهرس_الخارجي < طول(مصفوفة)؛ الفهرس_الخارجي := الفهرس_الخارجي + 1 {
لاجل الفهرس_الداخلي := 0؛ الفهرس_الداخلي < طول(مصفوفة)؛ الفهرس_الداخلي:= الفهرس_الداخلي + 1 {
اذا الفهرس_الداخلي < (طول(مصفوفة) - 1_ط) {
اذا مصفوفة[الفهرس_الداخلي]> مصفوفة[الفهرس_الداخلي + 1] {
المتغير المتغير_المؤقت صحيح := مصفوفة[الفهرس_الداخلي + 1]؛
مصفوفة[الفهرس_الداخلي + 1] := مصفوفة[الفهرس_الداخلي]؛
مصفوفة[الفهرس_الداخلي] := المتغير_المؤقت؛
}
}
}
}
}
مع
المتغير أرقام_6 [ ] صحيح := [5، 4، -2، 8، 9، 0]
المثال يمكن تطبيقه أيضا على مصفوفة
المتغير أرقام_6_6 [6][6] صحيح := [ [5، 4، -2، 8، 9 ] ، [5، 4، -2، 8، 9 ] ، [5، 4، -2، 8، 9 ] ، [5، 4، -2، 8، 9 ] ، [5، 4، -2، 8، 9 ] ،
[0،0،0،0،0 ] ]
الدالة اكتب ( أرقام_6_6 [6][6] صحيح ) {
ليكن ا := 0
ليكن ب := 0
لاجل ا := 0 ؛ ا<6 ؛ ا++ {
رتب__6 (أرقام_6_6 [ا] )
}
لاجل ا := 0؛ ا< 6 ؛ ا++ {
لاجل ب := 0؛ب< 6 ؛ب++ {
اكتب (أرقام_6_6[ا][ب]) ؛ '/ج'.اكتب ()
}
'/س'.اكتب ()
}
}
