[زياد_عاطف]

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

سؤال للتحدي فهل من مشارك

ما ناتج تنفيذ هذا البرنامج مع تتبع القيم x , y مع الشرح

dim x = 12, y as short = 3

for x = 1 to x step y

x = y + 1
y = y - x
next
msgbox(x)1

================================================== =======
فى اول تكرار

x = 3 + 1 = 4
y =3 - 1 = -1

فى ثانى تكرار

x = -1 + 1 = 0
y = -1 -0 = -1

بعد ذلك for x = 1 t 0 step -1
سيتم التكرار طالما ان قيمة العداد x = 1 اكبر من او تساوى النهاية 0 لان قيمة step سالب
فيكون ثالث تكرار

x = -1 + 1 = 0
y = -1 - 0 = -1

و بذلك تكون الجملة بعد ذلك for x = 1 t 0 step -1

سيتم التكرار طالما ان قيمة العداد x = 1 اكبر من او تساوى النهاية 0 لان قيمة step سالب

فيكون رابع تكرار

x = -1 + 1 = 0
y = -1 - 0 = -1
و بهذا نكون قد انتقلنا لحلقة تكرارية لا نهائية يتم فيها عرض مربعى رسالة الاول فيه قيمة x=0 و الثانى فيه قيمة y=-1
=============
عاطف حسان / ميت موسى