الرجاء منكم حل امتحان محافظة بورسعيد للأهمية

وياريت الإجابة علي الأسئلة دي
إذا كانت X, Y, J, K, Z متغيرات صحيحة قيمها كالتالي: X=8 , Y=2 , J=3 , K=4
اخـتر القيمة الصحيحة للمتغير Z بعد تنفيـذ الأوامـر التـاليـة:
If X > Y And J < K Then
Z = X - Y
Else
Z = J + K
End If

أ- 6 ب- 7 ج- 8

الكود الثاني

Dim Count, Sum As Integer
Count = 1
Sum = 0
Do While Count <= 10
Sum = Sum + Count
Count = Count + 3
Loop
MsgBox(Sum)
بعـد تنفيـذ هـذا الكـود تكـون القيمة النهـائيـة للمتغـير Sum هي:
أ - 12 ب - 22 ج- 35

الأكواد
الأول ( 6 )
الثاني ( 22 )

الرجاء منكم حل امتحان محافظة بورسعيد للأهمية

وياريت الإجابة علي الأسئلة دي
إذا كانت X, Y, J, K, Z متغيراتصحيحة قيمها كالتالي: X=8 , Y=2 , J=3 , K=4
اخـتر القيمة الصحيحة للمتغير Z بعد تنفيـذ الأوامـر التـاليـة:
If X > Y And J < K Then
Z = X - Y
Else
Z = J + K
End If

أ- 6 ب- 7 ج- 8

الكود الثاني

Dim Count, Sum As Integer
Count = 1
Sum = 0
Do While Count <= 10
Sum = Sum + Count
Count = Count + 3
Loop
MsgBox(Sum)
بعـد تنفيـذ هـذا الكـود تكـون القيمة النهـائيـة للمتغـير Sum هي:

أ - 12 ب - 22ج- 35



اجابة امتحان بورسعيد على هذا الرابط
هنـــــــــــــــــــــا (http://www.thanwya.com/vb/showthread.php?p=3438565&posted=1#post3438565)

اما السؤال المطلوب اجابته
الكود الأول به جزء ملغي .. طالما ان الشرط تحقق فيتم تنفيذ الأمر الذي يلي Then
Z = X - Y
Z = 8 - 2 = 6

الكود الثاني .. ملغي