مشاهدة النسخة كاملة : سؤال ضرورى أرجو الاجابه


أحمد أيمن
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

اتمنى اكون افدت حضرتك :)