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

[فهم]

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

ما ناتج تنفيذ ها البرنامج مع تتبع القيم 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 = 0 إلى ما نهاية وقيمة Y = -1

[سيف سالم]

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

ان شاء الله تكون آخر قيمة لـــ x = 0 إلى ما نهاية وقيمة Y = -1

ليس هناك قيمة نهائبة x ولكن ستبدل بين 0 و 3

السؤال كيف تحل هذة المسائل