اقتباس:
المشاركة الأصلية كتبت بواسطة ماجدة عمرو
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 قيمة المتغير c =
ناتج N>c هو
قيمة المتغير k = |
وقيم المتغير n
( 1 ، 4 ، 7 )
وقيم k
( 1 ، 4 ) = ( 1+4 ) = 5
- ناتج N>c هو true لتحقق الشرط
وبالتالي
c = c + 1
6+1 = 7
اذن قيمة المتغير c = 7