[hassanalhawy]

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

اقرأالتعليمات التالية ثم أكمل العبارات التالية :
Dim x,Sum as integer
For X= 2 to 6 step 2
sum = sum+ x
If x < 4 Then
X= X+2
End If
Next
1- قيمة المتغير Sum تساوى 8
2- قيمة المتغير X تساوى 8
3- قيمة التعبير X<4 فى المرة الثانية للتكرار تكون False
حاول تحل السؤال وهرفع الاجابة بعد تجميع اجابات الاخريين لتوضيحه

X.........Sum
========
0..............0 ............Dim x,Sum as integer
0..............2 ............ For X= 2 to 6 step 2
2..............2 ............ sum = sum+ x
2..............2 ............ If x < 4 Then ناتج الشرط True
2..............4 ............X= X+2
2..............6 ............ For X= 2 to 6 step 2
8..............6 ............ sum = sum+ x
8..............6 ............ If x < 4 Then ناتج الشرط False
8..............8 ............ For X= 2 to 6 step 2
ثم يتم الخروج من الحلقة التكرارية وتنفيذ ما يلى Next
ملحوظة : يتم زيادة قيمة متغير الحلقة بعد الوصول للأمر For وليس Next