اهلا وسهلا بك فى بوابة الثانوية العامة ... سجل الان

العودة   بوابة الثانوية العامة المصرية > المرحلة الاعدادية > الفصل الدراسى الثانى > الصف الثالث الاعدادى > الكمبيوتر وتكنولوجيا المعلومات 3 ع ترم 2 > حاسب آلى 3ع ترم2

إضافة رد
 
أدوات الموضوع انواع عرض الموضوع
  #1  
قديم 11-05-2014, 04:15 AM
نهال أاحمد نهال أاحمد غير متواجد حالياً
عضو جديد
 
تاريخ التسجيل: Feb 2013
المشاركات: 4
معدل تقييم المستوى: 0
نهال أاحمد is on a distinguished road
افتراضي

ممكن حل هذه المساله
dim a,b,c as integer
b=10
c=b/2
for a=6 to 3 step -3
b=b-1
c=c-1
next
msgbox (a
msgbox (b
msgbox (c
رد مع اقتباس
  #2  
قديم 11-05-2014, 04:48 PM
الصورة الرمزية أحـمد قرنى
أحـمد قرنى أحـمد قرنى غير متواجد حالياً
معلم حاسب آلى
 
تاريخ التسجيل: Oct 2010
المشاركات: 2,459
معدل تقييم المستوى: 18
أحـمد قرنى has a spectacular aura about
افتراضي

اقتباس:
المشاركة الأصلية كتبت بواسطة نهال أاحمد مشاهدة المشاركة
ممكن حل هذه المساله
dim a,b,c as integer
b=10
c=b/2
for a=6 to 3 step -3
b=b-1
c=c-1
next
msgbox (a
msgbox (b
msgbox (c
قيمة المتغيرات كالتالى
المرة الاولى للتكرار
A = 6
ويتم تنفيذ الامر b = b - 1 بالتعويض عن قيمة b =10 ومنها تصبح قيمة b = 9
ايضا يتم تنفيذ الامر c = c - 1 بالتعويض عن قيمة c = 5 ومنها تصبح قيمة c = 4

المرة الثانية للتكرار
a = 3
ويتم تنفيذ الامر b = b - 1 مرة ثانية بالتعويض عن قيمة b =9 ومنها تصبح قيمة b = 8
ايضا يتم تنفيذ الامر c = c - 1 مرة ثانية بالتعويض عن قيمة c = 4 ومنها تصبح قيمة c = 3

عند القيمة a = 0 ينتهى التكرار ويخرج من الحلقة التكرارية ليتفذ ما بعد next
ويعرض رسالة بقيمة a = 0 وقيمة b = 8 وقيمة c = 3
__________________
ـــــــــــــــــــــــــــــــــــــــــــــــ
لا إله إلا أنت سبحانك إنى كنت من الظالمين
رد مع اقتباس
إضافة رد

العلامات المرجعية


ضوابط المشاركة
لا تستطيع إضافة مواضيع جديدة
لا تستطيع الرد على المواضيع
لا يمكنك اضافة مرفقات
لا يمكنك تعديل مشاركاتك

BB code متاحة
كود [IMG] متاحة
كود HTML معطلة

الانتقال السريع


جميع الأوقات بتوقيت GMT +2. الساعة الآن 06:05 PM.