[أحـمد قرنى]

[QUOTE=maxval;4438990]

Dim X , N As Integer

X = 1

For N = 0 TO 7 Step 4

X = X * 2

Next

بعد تنفيذ التعليمات السابقة تكون :
أ‌- قيمة N هى ( 8 )
ب‌- قيمة X هى ( 4 )