بوابة الثانوية العامة المصرية - هام وعاجل الى الاستاذ الفاضل احمد قرنى

بوابة الثانوية العامة المصرية (https://www.thanwya.com/vb/index.php)

- أرشيف المنتدى (https://www.thanwya.com/vb/forumdisplay.php?f=513)

- - هام وعاجل الى الاستاذ الفاضل احمد قرنى (https://www.thanwya.com/vb/showthread.php?t=643738)

هام وعاجل الى الاستاذ الفاضل احمد قرنى

Dim r As Integer = 1
Do While r <= 1
r = r – 2
Loop

( MsgBox(r)
لماذا الاجابة
Overflow

لان الحلقه غير منتهيه

اقتباس:

المشاركة الأصلية كتبت بواسطة mohamed_salem (المشاركة 6169919)

Dim r As Integer = 1
Do While r <= 1
r = r – 2
Loop

( MsgBox(r)
لماذا الاجابة
Overflow

R = Over flow

لأن الشرط(True) حيث R = 1

ولا نهاية للتكرار

و للتوضيح أكثر قم بوضع

(MsgBox(r)) قبل Loop

يظهر لنا نتائج لانهاية لها للجملة

r = r - 2

-1,-3,-5,-7……………………

شكرا بارك الله فيكم