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

العودة   بوابة الثانوية العامة المصرية > القسم الإداري > أرشيف المنتدى

أرشيف المنتدى هنا نقل الموضوعات المكررة والروابط التى لا تعمل

 
 
أدوات الموضوع ابحث في الموضوع انواع عرض الموضوع
  #1  
قديم 26-05-2010, 02:19 PM
الصورة الرمزية محمد عبد الحكم
محمد عبد الحكم محمد عبد الحكم غير متواجد حالياً
عضو لامع
 
تاريخ التسجيل: Oct 2009
المشاركات: 2,464
معدل تقييم المستوى: 18
محمد عبد الحكم is on a distinguished road
افتراضي

اقتباس:
المشاركة الأصلية كتبت بواسطة noorehan مشاهدة المشاركة
بجد طب مش ممكن يعدوا الاتنين
اصل شيت الوزارة ص 9 مش عامل كده
يعنى فيه مسألة زيها اهى

Dim count , Sum as Integer
Count = 1
Sum =0
Do While Count <= 10
Sum = sum + count
Count = count + 3
Loop
MsgBox

و المطلوب قيمة المتغير Sum

انا عارفة ان المطلوب مختلف بس لو مشينا بنظرية 5 و 2 هيكون الناتج غير اللى الوزارة عاملاه
عموما انا عايزة اعرف حل المسألة دى و بس
و شكرا
لا المثال مختلف
المشاركة الأصلية كتبت بواسطة noorehan
Dim x , sum as Integer
X = 1
Sum = 0
Do While X < 5
Sum = sum + x
X = x + 1
Loop
Average = Sum / x
قيمة x تساوي 5

امتي البرنامج هيخرج عن التكرار لما ناتج الشرط يكون False
يعني تكون قيمه x اكبر من اوتساوي 5
Sum = 1+2+3+4
10
Average = Sum / x
10/5=2
قيمة Average = 2..

الاجابة دي هتزعل ناس كتير بس ده الصح وقابل للمناقشه
  #2  
قديم 26-05-2010, 02:28 PM
noorehan noorehan غير متواجد حالياً
عضو جديد
 
تاريخ التسجيل: May 2010
المشاركات: 10
معدل تقييم المستوى: 0
noorehan is on a distinguished road
افتراضي

اقتباس:
المشاركة الأصلية كتبت بواسطة محمد عبد الحكم مشاهدة المشاركة
لا المثال مختلف
المشاركة الأصلية كتبت بواسطة noorehan
Dim x , sum as Integer
X = 1
Sum = 0
Do While X < 5
Sum = sum + x
X = x + 1
Loop
Average = Sum / x
قيمة x تساوي 5
امتي البرنامج هيخرج عن التكرار لما ناتج الشرط يكون False
يعني تكون قيمه x اكبر من اوتساوي 5
Sum = 1+2+3+4
10
Average = Sum / x
10/5=2
قيمة Average = 2..



الاجابة دي هتزعل ناس كتير بس ده الصح وقابل للمناقشه
اولا هى ال x بتساوي صفر في الاول معلش انا غلطت
طيب ما هى ساوت الـ 5
يعنى مفروض انه اخر قيمة تكون 4
فا بالتالى sum = 1 + 2 + 3 + 4
يعنى هتسـاوى 10 و ال average يكون 10 / 4 يعنى 5 /2 يعنى 2.5
و بعدين اذا كان كلام حضرتك صح
احنا مفروض نلتزم باللى في شيت الوزارة
يعنى جت مسألة زيها بالظبظ

يعنى فيه مسألة زيها اهى

Dim count , Sum as Integer
Count = 1
Sum =0
Do While Count <= 10
Sum = sum + count
Count = count + 3
Loop
MsgBox

و المطلوب قيمة المتغير Sum

مفروض ان count = 4 و بعدين 7 و بعدين 10 و بعدين يرجع يقيم الشرط تانى يلاقيه True
تبقى count اخر قيمة ليها ب 13
يعنى ال sum = 4 + 7 + 10 + 13 = 34
و الوزارة عاملاها 22 على اساس انه بعد ما يقف عن 10 مش هيكمل

انا عارفة ان المطلوب مختلف بس لو مشينا بنظرية 5 و 2 هيكون الناتج غير اللى الوزارة عاملاه

شكرا
  #3  
قديم 26-05-2010, 06:14 PM
nahla_m nahla_m غير متواجد حالياً
مدرس حاسب آلى
 
تاريخ التسجيل: Mar 2010
المشاركات: 83
معدل تقييم المستوى: 16
nahla_m is on a distinguished road
افتراضي

اقتباس:
المشاركة الأصلية كتبت بواسطة noorehan مشاهدة المشاركة
اولا هى ال x بتساوي صفر في الاول معلش انا غلطت
طيب ما هى ساوت الـ 5
يعنى مفروض انه اخر قيمة تكون 4
فا بالتالى sum = 1 + 2 + 3 + 4
يعنى هتسـاوى 10 و ال average يكون 10 / 4 يعنى 5 /2 يعنى 2.5
و بعدين اذا كان كلام حضرتك صح
احنا مفروض نلتزم باللى في شيت الوزارة
يعنى جت مسألة زيها بالظبظ

يعنى فيه مسألة زيها اهى

Dim count , Sum as Integer
Count = 1
Sum =0
Do While Count <= 10
Sum = sum + count
Count = count + 3
Loop
MsgBox

و المطلوب قيمة المتغير Sum

مفروض ان count = 4 و بعدين 7 و بعدين 10 و بعدين يرجع يقيم الشرط تانى يلاقيه True
تبقى count اخر قيمة ليها ب 13
يعنى ال sum = 4 + 7 + 10 + 13 = 34
و الوزارة عاملاها 22 على اساس انه بعد ما يقف عن 10 مش هيكمل

انا عارفة ان المطلوب مختلف بس لو مشينا بنظرية 5 و 2 هيكون الناتج غير اللى الوزارة عاملاه

شكرا

إبنتى الغالية

كلام الأستاذ / محمد عبد الحكم صح
و كلام الوزارة فى المسألة التى تشهدى بها صح

سأشرح لحضرتك
أولا بالنسبه لمسألة الوزارة
Count قيمها هى 1 و 4 و 7 و 10 و يقرأ 13 و يقف و لا ينفذ
Sum قيمها هى 1 و 5 و 12 و 22
آخر قيمة لـ sum هى 22
آخر قيمة لـ count 13 يقرأها فيجدها خطأ فلا ينفذ الأوامر
و الوزارة سألت فقط عن قيمة sum و قالت إن الإجابه 22 و هذا صح
و لم تسأل يا إبنتى عن average و لو أردنا معرفة average ستكون 13/22 أى تساوى 1.6923
هذا من واقع العملى على الجهاز

أما بالنسبة لمسألة الإمتحان
لو X=0
قيم X هى 0 و 1 و 2 و 3 و 4 و يقرأ 5 و يقف و لا ينفذ بعدها شئ
قيم Sum هى 0 و 1 و 3 و 6 و 10
أى أن قيمة sum هى 10
و قيمة x آخر مرة 5 و يقف
و قيمة average 10/5تساوى 2
من واقع العملى على البرنامج visual basic.net

لو X=1
قيم X هى 1 و 2 و 3 و 4 و يقرأ 5 و يقف و لا ينفذ بعدها شئ
قيم Sum هى 1 و 3 و 6 و 10
أى أن قيمة sum هى 10
و قيمة x آخر مرة 5 و يقف
و قيمة average 10/5تساوى 2
من واقع العملى على البرنامج visual basic.net

أرجو من الله أن تكون الأمور وضحت
  #4  
قديم 26-05-2010, 07:01 PM
mrk206 mrk206 غير متواجد حالياً
عضو نشيط
 
تاريخ التسجيل: Jun 2008
المشاركات: 190
معدل تقييم المستوى: 18
mrk206 is on a distinguished road
افتراضي

اقتباس:
المشاركة الأصلية كتبت بواسطة محمد عبد الحكم مشاهدة المشاركة
لا المثال مختلف
المشاركة الأصلية كتبت بواسطة noorehan
Dim x , sum as Integer
X = 1
Sum = 0
Do While X < 5
Sum = sum + x
X = x + 1
Loop
Average = Sum / x
قيمة x تساوي 5

امتي البرنامج هيخرج عن التكرار لما ناتج الشرط يكون False
يعني تكون قيمه x اكبر من اوتساوي 5
Sum = 1+2+3+4
10
Average = Sum / x
10/5=2
قيمة Average = 2..

الاجابة دي هتزعل ناس كتير بس ده الصح وقابل للمناقشه
السلام عليكم ورحمة الله وبركاته

قيمة العداد x = 1
اوامر التكرار ستكون كالاتي
1-2-3-4
عند 1 ستكون قيمة sum = 2
عند 2 ستكون قيمة sum 3
اذا عند العداد 4 قيمة x ستكون قيمة sum= 5
اذا قيمة x = 4
وقيمة sum = 5
averger = 1.25
 

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


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

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

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


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