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

[سيف سالم]

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

ما ناتج تنفيذ هذا البرنامج مع تتبع القيم 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

[body_12354]

ان شاء الله تكون قيمة
x = 4
y = -1
وهينتج خطأ وذلك لتغير قيمة ال x لانها سوف تكون في اول مرة تكرار 13 حتى 13 وعند الرجوع للمقارنة سوف يجد تغير في قيمة ال x حيث انها سوف تكون 4 بالاضافة الي قيمة الزيادة تحولت الى سالب وقيمة البداية اصغر من قيمة النهاية والدنيا ملخبطة والله ياستاذ سيف بس ده اللى انا توصلت له وشكرا يارب يكون صح

[سيف سالم]

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

ان شاء الله تكون قيمة
x = 4
y = -1
وهينتج خطأ وذلك لتغير قيمة ال x لانها سوف تكون في اول مرة تكرار 13 حتى 13 وعند الرجوع للمقارنة سوف يجد تغير في قيمة ال x حيث انها سوف تكون 4 بالاضافة الي قيمة الزيادة تحولت الى سالب وقيمة البداية اصغر من قيمة النهاية والدنيا ملخبطة والله ياستاذ سيف بس ده اللى انا توصلت له وشكرا يارب يكون صح

اولا نشكر لكم المحاولة
وفعلا y ستكون اخر القيم لها -1
لكن x لن تكون 4
وكذلك لن ينتج خطأ
والدنيا مش ملخبطة ولا حاجة
فقط ان نعرف كيف يكون امر for next

[(*أحمد عرفة*)]

ممكن الحل السليم فى جدول
Please

[سيف سالم]

المشاركة الأصلية كتبت بواسطة said el nas

ممكن الحل السليم فى جدول
please

ان شاء الله سيكون الحل السليم بمشاركة الجميع

[سيف سالم]

نرجو مساهمة الجميع

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

عند تنفيذ البرنامج تكون قيمة العداد

For x = 1 to 12 Step 3

لأنه يأخذ القيم من جملة الإعلان
ثم يبدأ بتنفيذ التكرار فتكون أول قيمة X تساوي 2 من المعادلة وقيمة y= 1
ثم يكرر مرة أخر فيزيد X بمقدار الزيادة 3 فتصبح 5 ثم في أول معادلة في جمل التكرار تزيد مرة أخري بمقدار واحد فتصبح 6 وعندها تكون Y بمقدار -5 فيذهب إلي إلي بداية التكرارة مرة أخر فتكون X = 9 ويزيد مرة أخري بمقدار واحد فتصبح 10 وتكون Y = -15 و فيذهب إلي إلي بداية التكرارة مرة أخر فتكون X = 13 فينتهي جملة For …. Next
وعلي ذلك تكون أخر قيمىة لـ x = 13 ، y = -15

[سيف سالم]

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

عند تنفيذ البرنامج تكون قيمة العداد

for x = 1 to 12 step 3

لأنه يأخذ القيم من جملة الإعلان
ثم يبدأ بتنفيذ التكرار فتكون أول قيمة x تساوي 2 من المعادلة وقيمة y= 1
ثم يكرر مرة أخر فيزيد x بمقدار الزيادة 3 فتصبح 5 ثم في أول معادلة في جمل التكرار تزيد مرة أخري بمقدار واحد فتصبح 6 وعندها تكون y بمقدار -5 فيذهب إلي إلي بداية التكرارة مرة أخر فتكون x = 9 ويزيد مرة أخري بمقدار واحد فتصبح 10 وتكون y = -15 و فيذهب إلي إلي بداية التكرارة مرة أخر فتكون x = 13 فينتهي جملة for …. Next
وعلي ذلك تكون أخر قيمىة لـ x = 13 ، y = -15

للاسف لن يحدث هذا والاجابات ليست دقيقة

نشكر لكم المحاولة
وجزاكم الله كل خير

[malaklabieb]

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

ما ناتج تنفيذ ها البرنامج مع تتبع القيم 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=16
y=-1

[سيف سالم]

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

ب
بعد تتبع هذا الكود سوف تكون الاجابة كالتالي :
X=16
y=-1

بالنسبة لقيمة y فهي اجابة سليمة
اما x فلا
وما هو التتبع

نشكر لكم مساهمنكم بالحل
بارك الله لكم

[nahla m]

الأستاذ الفاضل / سيف

رأى أن

x=0
y=-1

و أنتظر رد سيادتكم و لكم خالص الشكر

[سيف سالم]

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

الأستاذ الفاضل / سيف

رأى أن

x=0
y=-1

و أنتظر رد سيادتكم و لكم خالص الشكر

نشكركم للحل
فعلا Y ستكون -1 ابدا
اما x ستتراوح ما بين 0 و .....................
ويبقى السؤال ما ناتج البرنامج مع التتبع

جزاكم الله كل خير

[nahla m]

الأستاذ الفاضل / سيف

شكراً جزيلاً لحضرتك

و لكن هل حضرتك تطرح سؤال آخر
ما ناتج البرنامج مع التتبع

[سيف سالم]

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

ما ناتج تنفيذ ها البرنامج مع تتبع القيم 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

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

الأستاذ الفاضل / سيف

شكراً جزيلاً لحضرتك

و لكن هل حضرتك تطرح سؤال آخر
ما ناتج البرنامج مع التتبع

بارك الله لكم
هو دا السؤال الاصلي

[nahla m]

الأستاذ الفاضل / سيف

حضرتك رأى

x=4
y=-1

ثم

x=0
y=-1

و ستظل هكذا

x=0
y=-1

إلى ما لا نهاية

أنتظر رد سيادتكم و لكم جزيل الشكر