1- وظيفة المقطع البرمجي التالي: For i = 0 To 2 For j = 0 To 2 a(i,j) = inputbox("...") Next j Next i شرح السؤال حلل الجملة الموجودة داخل حلقتي الدوران: `a(i,j) = inputbox(...)`. ماذا تفعل الدالة `InputBox`؟ وماذا تفعل علامة الإسناد (=) هنا؟ طباعة عناصر المصفوفة a قراءة عناصر قطر المصفوفة a طباعة عناصر قطر المصفوفة a إدخال عناصر المصفوفة a الإجابة الصحيحة هي (إدخال عناصر المصفوفة a)الدالة `InputBox` تستخدم لعرض مربع حوار يطلب من المستخدم إدخال قيمة. وجملة الإسناد `a(i,j) = ...` تقوم بأخذ القيمة التي أدخلها المستخدم وتخزينها في عنصر المصفوفة المحدد بالفهرسين i و j. بما أن الكود يمر على جميع عناصر المصفوفة ويطلب من المستخدم قيمة لكل عنصر، فإن وظيفته هي ملء أو "إدخال عناصر" المصفوفة.(الفصل الخامس: المصفوفات، 5-4: تطبيقات على المصفوفات، 5-4-1: التطبيق الأول، صفحة 83)
2- المقطع البرمجي التالي يقوم بطباعة: Private Sub Form_load() Dim A(3,3) As integer For I = 0 to 3 For J = 0 to 3 A(i,j) = i + j Next j Next I For i = 0 to 3 Print A(I,I) Next i End Sub شرح السؤال حلل حلقة الدوران الأخيرة. لاحظ أن جملة الطباعة هيPrint A(I,I). ماذا يعني أن يكون فهرس الصف وفهرس العمود متساويين دائماً؟ أي جزء من المصفوفة يمثل هذا الشرط؟ قطر المصفوفة محورة المصفوفة محدد المصفوفة جميع عناصر المصفوفة الإجابة الصحيحة هي (قطر المصفوفة)حلقة الدوران الأخيرة تمر منi = 0إلى 3، وفي كل مرة تطبع العنصرA(i, i). هذا يعني أنها ستطبع العناصرA(0,0),A(1,1),A(2,2), وA(3,3). هذه العناصر هي التي تشكل القطر الرئيسي للمصفوفة. تدريب:كيف يمكنك تعديل الكود ليقوم بطباعة القطر الثانوي للمصفوفة؟ (الفصل الخامس: المصفوفات، 5-5: تمارين، صفحة 90 - سؤال تطبيقي)
