
28-03-2011, 09:53 AM
|
عضو مجتهد
|
|
تاريخ التسجيل: Feb 2011
المشاركات: 35
معدل تقييم المستوى: 0
|
|
اقتباس:
المشاركة الأصلية كتبت بواسطة ashraf161972
قم بعمل برنامج يقوم بجمع الأعداد الفردية من 1 وحتى المتغير limit حيث أن المتغير limit يأخذ قيمته من أداة textbox1.text
dim x , limit , total as intger
limit = tectbox1.text
x= 1
do while x<= limit
total = total + x
x= x + 2
loop
msgbox ( total
1- هل يقوم بجمع الأعداد الفردية التى تقع فى محيط العدد واحد وقيمة المتغير مثلا لو كان المتغير Limit = 5
يقوم بجمع الأعداد 1+3+5 = 9
أرجو وضع إيضاح وافى لكيفية حل هذا السؤال
|
مبدئيا لو هنفرض انك ادخلت فى الـ textbox1 الرقم 5
فإن المتغير limit بداخله الرقم 5
وبالتالى فإننا نريد جمع الأعداد الفردية من 1 إلى 5
حيث القيمة الابتدائية لـ X = 1
فيتم جمعها على المتغير total فيصبح 1
ثم نزيد الـX بـ 2 قتصبح قيمتها الجديدة 3
ثم نعود لاختبار الشرط هل قيمة الـ X أقل من أو تساوى Limit والنتيجة نعم
فيتم جمعها على المتغير total فيصبح4
ثم نزيد الـX بـ 2 قتصبح قيمتها الجديدة 5
ثم نعود لاختبار الشرط هل قيمة الـ X أقل من أو تساوى Limit والنتيجة نعم
فيتم جمعها على المتغير total فيصبح9
وعند زيادة العداد X مرة أخرى فيصبح 7
ويعاود اختبارة فإن الشرط لن يتحقق
فيقوم بتنفيذ الجملة التى تلى Loop
وهى رسالة بقيمة total بــ 9
وشكرا
|