[السيد شعبان]

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

اقرأ التعليمـات الآتيـة:
Dim N , K , C As Integer

C = 6

For N = 1 To 6 Step 3

K = K + N

Next

If N > C Then

C = C + 1

End If
بعـد تنفيـذ هذه التعليمـات، أكمـل مكـان النقـط:
1- قيمة المتغير C تسـاوي 7
2- قيمة المتغير N تسـاوي 7
3- ناتج الشرط N > C يسـاوي صحيحة
4- قيمة المتغير Kتسـاوي: 5 .

والله اعلم