حل المسالة الاخيرة فى امتحان الدقهلية
A.......B.......C
========
0.......0.......0.........Dim A,B,C As Integer
0.......10.....0.........B = 10
5.......10.....0.........C = B / 2
5.......10.....6.........For A=6 To 3 Step -3
5.......9.......6.........B = B - 1
6.......9.......6.........C = C + 1
6.......9.......3.........For A=6 To 3 Step -3
6.......8.......3.........B = B - 1
7.......8.......3.........C = C + 1
7.......8.......0.........For A=6 To 3 Step -3 ثم يتم الخروج من الحلقة لتخطى قيمة A القيمة النهائية للعداد
ثم تظهر صناديق نصوص 3 متتالية
الأول : بقيمة A وهو 0
الثانى : بقيمة B وهو 8
الثالث : بقيمة C وهو 7
__________________
يخطئ من يظن أن للذئاب ديناً
|