|
|
|
#1
|
|||
|
|||
|
ممكن حل هذه المساله
dim a,b,c as integer b=10 c=b/2 for a=6 to 3 step -3 b=b-1 c=c-1 next msgbox (a msgbox (b msgbox (c |
|
#2
|
||||
|
||||
|
اقتباس:
المرة الاولى للتكرار A = 6 ويتم تنفيذ الامر b = b - 1 بالتعويض عن قيمة b =10 ومنها تصبح قيمة b = 9 ايضا يتم تنفيذ الامر c = c - 1 بالتعويض عن قيمة c = 5 ومنها تصبح قيمة c = 4 المرة الثانية للتكرار a = 3 ويتم تنفيذ الامر b = b - 1 مرة ثانية بالتعويض عن قيمة b =9 ومنها تصبح قيمة b = 8 ايضا يتم تنفيذ الامر c = c - 1 مرة ثانية بالتعويض عن قيمة c = 4 ومنها تصبح قيمة c = 3 عند القيمة a = 0 ينتهى التكرار ويخرج من الحلقة التكرارية ليتفذ ما بعد next ويعرض رسالة بقيمة a = 0 وقيمة b = 8 وقيمة c = 3
__________________
ـــــــــــــــــــــــــــــــــــــــــــــــ لا إله إلا أنت سبحانك إنى كنت من الظالمين
|
![]() |
| العلامات المرجعية |
| أدوات الموضوع | |
| انواع عرض الموضوع | |
|
|