أحمد أيمن
13-05-2015, 08:13 PM
Dim x as single=4
Dim y as integer
For y =0 to 5 step 3
X=x*2
Next
Msgbox(x)
ما يتم عرضه فى مربع الرساله هو
Dim y as integer
For y =0 to 5 step 3
X=x*2
Next
Msgbox(x)
ما يتم عرضه فى مربع الرساله هو
مشاهدة النسخة كاملة : سؤال ضرورى أرجو الاجابه أحمد أيمن 13-05-2015, 08:13 PM Dim x as single=4 Dim y as integer For y =0 to 5 step 3 X=x*2 Next Msgbox(x) ما يتم عرضه فى مربع الرساله هو bosyramy 13-05-2015, 08:16 PM ما يتم عرضه فى مربع الرساله هو 16 أحمد أيمن 13-05-2015, 08:37 PM بعد اذنك مش فهمها محمدالصفتى 13-05-2015, 08:39 PM بعد اذنك مش فهمها الرساله خارج الحلقه اذا قيمة النهايه هى 16 محمدالصفتى 13-05-2015, 08:43 PM الرساله خارج الحلقه اذا قيمة الخارج اما اذا كانت الرساله داخل الحلقه تكون القيمه هى8 و 16 أ/ حسن على 15-05-2015, 01:44 AM قيمة x هى 16 ahmeddeep 16-05-2015, 06:06 PM ممكن الشرح بالتفصيل لكى يستفيد الجميع mhmd mahmod 16-05-2015, 08:32 PM اعتقد القيمة 16 بعد الخروج Hamada Elshazly 16-05-2015, 08:34 PM التكرار هنا هيحصل مرتين يا استاذ أحمد قيمة المتغير العداد الخاص بالحلقة هتبق ( 0 و 3 ) وبعد الخروج هتبقى (6) وده معناه ان عملية التكرار هتحصل مرتين .. فبذلك المعادلة (x=x*2) هتتنفذ مرتين وبما ان قيمة المتغير x=4 قبل التكرار إذن 4×2 = 8 .. ودي اول حلقة ثم فى الحلقة التانية 8×2 = 16 ومعها ينتهي التكرار .. وقيمة المتغير X=16 اتمنى اكون افدت حضرتك :) |