[وائل الجندي]

المشاركة الأصلية كتبت بواسطة mmokh_23

بتتبع خطوات تنفيذ البرنامج التالى حتى ينتهى الــ Loop يكون هناك أربعة نواتج تظهر فى صندوق

Messeg Box.show (Total

Dim i = 1 , Total As integer


Do while i <= 8


i= i+2


Total = Total + i


Messeage Box. show ( Total


Loop

ضع قيمة كل دورة أمامها

1 - القيمة فى المرة الأولى بالصندوق هى .........

2 - القيمة فى المرة الثانية بالصندوق هى .........

3 - القيمة فى المرة الثالثة بالصندوق هى .........

4 - القيمة فى المرة الرابعة بالصندوق هى .........

أرجو الاجابة مع التوضيح بالشرح

في المرة الأولي تكون قيمة I هي 1 وبالتالي يتم زيادة I بمقدار2 فتكون قيمتها 3 ويتم زيادة 3 علي قيمة total وهي 0 فتكون قيمة Total في المرة الأولي هي 3

وهكذا في المرة الثانية 8
وفي الثالثة 15
وفي الرابعة 24