[راغب المصري]

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

بارك الله فيك أستاذي العزيز


ولكن لدى استفسار عندما تكون i بـ 6 الا يحقق الشرط هذه الأمر

Else if ( I mod 3=0) then
Msgbox( I*I )

وعليه يكون الناتج 36

(Y) و (Sum) سؤال آخر تتبع الكود التالى ثم اكتب قيمة المتغيرات

Sum=0
Y=1
DoWhile Sum<0
Sum=Sum + Y
Y=Y+1
Loop

فهل يكون الشرط خاطئ وهل تكون قيمة

Sum =0 و Y=1
أرجو التوضيح

سؤال آخر اكتب ناتج الكود التالى

N=20
i=6
For i = 6 To 20 Step 2
N = N + 6
Next

بالنسبة للاستفسار الأول
نعم حيث 6mod3=0
i*i=6*6=36
الاستفسار الثانى :
نغم الشرط صيغته خطأ والمفترض أنه يكون
do while sum >= 0
وعندها تكون :
sum=1
y=2
لو الشرط زي ما أنا كتبته

الإستفسار الثالث :
i = 6 , 8, 10 , 12 , 14 , 16 , 18 , 20
الحل :
لما ----
i = 6 ناتج التنفيذ n = 20 + 6 = 26
i = 8 ناتج التنفيذ n = 26+6 = 32
i= 10 ناتج التنفيذ n= 32 + 6 = 38
i = 12 ناتج التنفيذ n= 38 +6 = 44
i = 14 ناتج التنفيذ n = 44 +6 = 50
i = 16 ناتج التنفيذ n = 50 + 6 = 56
i = 18 ناتج التنفيذ n = 56+ 6 = 62
i = 20 ناتج التنفيذ n = 62 + 6 = 68