حاجة مهمة

[mrk206]

المشاركة الأصلية كتبت بواسطة محمد عبد الحكم

لا المثال مختلف
المشاركة الأصلية كتبت بواسطة noorehan
Dim x , sum as Integer
X = 1
Sum = 0
Do While X < 5
Sum = sum + x
X = x + 1
Loop
Average = Sum / x
قيمة x تساوي 5
امتي البرنامج هيخرج عن التكرار لما ناتج الشرط يكون False
يعني تكون قيمه x اكبر من اوتساوي 5
Sum = 1+2+3+4
10
Average = Sum / x
10/5=2
قيمة Average = 2..

الاجابة دي هتزعل ناس كتير بس ده الصح وقابل للمناقشه

السلام عليكم ورحمة الله وبركاته

قيمة العداد x = 1
اوامر التكرار ستكون كالاتي
1-2-3-4
عند 1 ستكون قيمة sum = 2
عند 2 ستكون قيمة sum 3
اذا عند العداد 4 قيمة x ستكون قيمة sum= 5
اذا قيمة x = 4
وقيمة sum = 5
averger = 1.25