|
سؤال فى امتحان محافظة الاسكندرية 2010
Dim R As integer أكتب القيمة النهائية للمتغير Total Dim Total As integer For R = 1 to 8 Step2 Total = Total + R Next Msgebox ( Total) هو الحل طلع بـ 16 بس عاوز افهم ازاى ممكن الحل بالتفصيل لو سمحتم ولكم جزيل الشكر |
Dim R As integer
Dim Total As integer For R = 1 to 8 Step2 Total = Total + R Next Msgebox ( Total في البداية لازم تعرف إن عند التكرار لابد نقف عند القيمة الكبري بعد for يعنى التكرار سيكون 1 و 3 و 5 و 7 بخطوة 2 ثم نفوم بعملية تكرار العملية total = total + r total فى البداية =صفر صفر + 1 1 + 3 4 + 5 9 + 7 و بذلك تصبح total بـ 16 |
مشكوووووووووووووووووووووووووووور
جزاك الله كل خير |
جزاك الله كل الخير
|
جزاك الله كل خير
|
شكراً
|
نعم االاجابة
كما قال مشكور 16 |
| جميع الأوقات بتوقيت GMT +2. الساعة الآن 03:51 AM. |
Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.