انت تسأل وجميع الاساتذة تجيب

[bolbola101]

يا اساتذه المنتدى الكرام الله يخليكوا اشرجوا لنا السؤال الأخير بتاع امتحان الدقهليه الله يباركلكم
ارجوكم الواحد كان ماشى حلو اوى فى الأمتحانات وفجأه الدنيا غيمت

[MR : ABO BATTA]

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

يا اساتذه المنتدى الكرام الله يخليكوا اشرجوا لنا السؤال الأخير بتاع امتحان الدقهليه الله يباركلكم
ارجوكم الواحد كان ماشى حلو اوى فى الأمتحانات وفجأه الدنيا غيمت

Dim X, Y,W,Z as Integer
Z=5
W=4
For X= 2 To 4 Step 2
Y= Y+X
W= W-1
Next
If Y> Z Then
W = W \ 2
Z = Z + Y
End If

الإجابة

X = 2
X = 2 + 2 = 4
X = 4 + 2 = 6 وهنا يتوف التكرار
Y = Y + X
Y = 0 + 2 = 2
Y = 2 + 4 = 6
W = W – 1
W = 4 – 1 = 3
W = 3 – 1 = 2
بعد اختبار الشرط نجد انه تحقق واخذ القيمة True اذن يتم تنفيذ الأوامر التي Then وهي :
W = W / 2
W = 2 / 2 = 1
Z = Z + Y
Z = 5 + 6 = 11
مما سبق نصل إلى القيم النهائية للمتغيرات الثلاثة وهي :

Y = 6
W = 1
Z = 11