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

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

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

 
 
أدوات الموضوع ابحث في الموضوع انواع عرض الموضوع
  #1  
قديم 15-03-2012, 05:48 PM
الصورة الرمزية أحـمد قرنى
أحـمد قرنى أحـمد قرنى غير متواجد حالياً
معلم حاسب آلى
 
تاريخ التسجيل: Oct 2010
المشاركات: 2,459
معدل تقييم المستوى: 17
أحـمد قرنى has a spectacular aura about
افتراضي

استاذنا الفاضل سيف سالم
هذا المثال سبب حيرة واختلاف عند الكثير ولكن وجدت مخرج لحد ما لهذه المشكلة


Dim x, i As Integer
i = 2
For x = 0 To 6 Step 2
i = i * 2
msgbox x
Next

هذا المثال ليس به اختلاف بين أحد فى قيم x كالتالى x = 0 , 2 , 4 , 6

Dim x, i As Integer
i = 2
For x = 0 To 6 Step 2
i =i * 2
Next
msgbox x

هذا المثال أيضاً ليس به اختلاف بين أحد فى قيمة x كالتالى x = 8

Dim x, i As Integer
i = 2
For x = 0 To 6 Step 2
i =i * 2
Next

هنا تكمن المشكلة فهو لم يحدد قيم x داخل التكرار أم خارج التكرار فافضل شىء لذلك

نوضح أن قيم x داخل التكرار هى x = 0 , 2 , 4 , 6 بينما قيمة x خارج التكرار x = 8

فى حين لو طلب القيمة النهائية أيضا نقول كالتالى آخر قيمة للمتغير x داخل التكرار هى x = 6 ، بينما آخر قيمة للمتغير x خارج التكرار x = 8

__________________
ـــــــــــــــــــــــــــــــــــــــــــــــ
لا إله إلا أنت سبحانك إنى كنت من الظالمين
  #2  
قديم 15-03-2012, 08:07 PM
ماجدة عمرو ماجدة عمرو غير متواجد حالياً
عضو مجتهد
 
تاريخ التسجيل: Feb 2009
المشاركات: 114
معدل تقييم المستوى: 17
ماجدة عمرو is on a distinguished road
افتراضي سؤال وارجو الرد

1- بالنسبة للامر for....next انا مش عارفة اجابتى على الطالب تكون 8 ولا 6 وهذا لأن واضع الامتحان بيكون له نية معينة ووجهة نظر محددة وغير مسموح للمصححين بالتعليق عليها فاتمنى من واضعى الامتحان عامة والمنوفية خاصة ان يردوا على ذلك علشان نوصل وجهة نظرهم للطلبة اصحاب المصلحة اولا واخيرا

2-

Dim x As Integer
x = 1
Do While x < 8
x = x + 2
Loop

انا الى فهمته ان قيمة x هى 9 وان قبم x داخل التكرار هى 3,5,7,9 وان عدمرات تنفيذ الأمر 3 مرات
  #3  
قديم 15-03-2012, 10:16 PM
سيف سالم سيف سالم غير متواجد حالياً
مــٌــعلــم
 
تاريخ التسجيل: Jul 2008
العمر: 57
المشاركات: 4,642
معدل تقييم المستوى: 22
سيف سالم is on a distinguished road
افتراضي

اقتباس:
المشاركة الأصلية كتبت بواسطة ماجدة عمرو مشاهدة المشاركة
1- بالنسبة للامر for....next انا مش عارفة اجابتى على الطالب تكون 8 ولا 6 وهذا لأن واضع الامتحان بيكون له نية معينة ووجهة نظر محددة وغير مسموح للمصححين بالتعليق عليها فاتمنى من واضعى الامتحان عامة والمنوفية خاصة ان يردوا على ذلك علشان نوصل وجهة نظرهم للطلبة اصحاب المصلحة اولا واخيرا

2-

Dim x As Integer
x = 1
Do While x < 8
x = x + 2
Loop

انا الى فهمته ان قيمة x هى 9 وان قبم x داخل التكرار هى 3,5,7,9 وان عدمرات تنفيذ الأمر 3 مرات
مثال do while ليس به ادنى مشكلة
قيمة x هي 9 قبل وبعد loop
ولكن عدد مرات التكرار 4 و ليس 3
  #4  
قديم 15-03-2012, 09:02 PM
سيف سالم سيف سالم غير متواجد حالياً
مــٌــعلــم
 
تاريخ التسجيل: Jul 2008
العمر: 57
المشاركات: 4,642
معدل تقييم المستوى: 22
سيف سالم is on a distinguished road
افتراضي

اقتباس:
المشاركة الأصلية كتبت بواسطة أحـمد قرنى مشاهدة المشاركة
استاذنا الفاضل سيف سالم
هذا المثال سبب حيرة واختلاف عند الكثير ولكن وجدت مخرج لحد ما لهذه المشكلة


Dim x, i As Integer
i = 2
For x = 0 To 6 Step 2
i = i * 2
msgbox x
Next

هذا المثال ليس به اختلاف بين أحد فى قيم x كالتالى x = 0 , 2 , 4 , 6

Dim x, i As Integer
i = 2
For x = 0 To 6 Step 2
i =i * 2
Next
msgbox x

هذا المثال أيضاً ليس به اختلاف بين أحد فى قيمة x كالتالى x = 8

Dim x, i As Integer
i = 2
For x = 0 To 6 Step 2
i =i * 2
Next

هنا تكمن المشكلة فهو لم يحدد قيم x داخل التكرار أم خارج التكرار فافضل شىء لذلك

نوضح أن قيم x داخل التكرار هى x = 0 , 2 , 4 , 6 بينما قيمة x خارج التكرار x = 8

فى حين لو طلب القيمة النهائية أيضا نقول كالتالى آخر قيمة للمتغير x داخل التكرار هى x = 6 ، بينما آخر قيمة للمتغير x خارج التكرار x = 8

ان شاء نقوم بمشاركة الاستاذ احمد قي تلك الاسئلة
ولكن اولا لو عدلنا المثال وكان كالتالي

Dim x As Integer
For x = 12 To 6 Step 2

Next
ما قيمة x قبل next وما قيمة x بعد next وهل صياغة السؤال كدا جيد ام ان نقول اوجد قيمة x بعد تنفيذ البرنامج
  #5  
قديم 15-03-2012, 10:13 PM
الصورة الرمزية أبو مريم2008
أبو مريم2008 أبو مريم2008 غير متواجد حالياً
مــٌــعلــم
 
تاريخ التسجيل: Aug 2008
المشاركات: 502
معدل تقييم المستوى: 17
أبو مريم2008 is on a distinguished road
افتراضي

اقتباس:
المشاركة الأصلية كتبت بواسطة سيف سالم مشاهدة المشاركة
ان شاء نقوم بمشاركة الاستاذ احمد قي تلك الاسئلة
ولكن اولا لو عدلنا المثال وكان كالتالي

dim x as integer
for x = 12 to 6 step 2

next
ما قيمة x قبل next وما قيمة x بعد next وهل صياغة السؤال كدا جيد ام ان نقول اوجد قيمة x بعد تنفيذ البرنامج
أستاذى/ سيف سالم
اعتقد أن اجابة هذه النوعية من الأسئلة تكون عند جهاز الكمبيوتر وبالأخص برنامج الفيجوال بيزيك
وبالتالى الاجابة تكون بناء على تنفيذ البرنامج والنتيجة التى تظهر من خلال الكمبيوتر المفروض أنها هى النتيجة الصحيحة
لأننا لو أطلقنا العنان لتفكيرنا سيكون هناك اجابات مختلفة كثير

وأنا بدورى عندما يسألنى طالب فى المعمل على جزئية مثل هذه وأمامه جهاز كمبيوتر

أرد عليه : "طيب ما تسأل الكمبيوتر أفضل وشوفه هيرد عليك بايه"

وشكرا
__________________



إن الطبيب بطبه ودوائه
*** لا يستطيع دفع نحب قد أتى
مات المُداويِ والمُداوىَ والذى *** جمع الدواء أو باعه ومن اشترى
  #6  
قديم 15-03-2012, 10:23 PM
سيف سالم سيف سالم غير متواجد حالياً
مــٌــعلــم
 
تاريخ التسجيل: Jul 2008
العمر: 57
المشاركات: 4,642
معدل تقييم المستوى: 22
سيف سالم is on a distinguished road
افتراضي

اقتباس:
المشاركة الأصلية كتبت بواسطة أبو مريم2008 مشاهدة المشاركة
أستاذى/ سيف سالم
اعتقد أن اجابة هذه النوعية من الأسئلة تكون عند جهاز الكمبيوتر وبالأخص برنامج الفيجوال بيزيك
وبالتالى الاجابة تكون بناء على تنفيذ البرنامج والنتيجة التى تظهر من خلال الكمبيوتر المفروض أنها هى النتيجة الصحيحة
لأننا لو أطلقنا العنان لتفكيرنا سيكون هناك اجابات مختلفة كثير

وأنا بدورى عندما يسألنى طالب فى المعمل على جزئية مثل هذه وأمامه جهاز كمبيوتر

أرد عليه : "طيب ما تسأل الكمبيوتر أفضل وشوفه هيرد عليك بايه"

وشكرا
نشكر استاذنا الفاضل ابو مريم ونتفق معه
ولكن ما هو قيمة x قبل وبعد next في المثال السابق والسابق اقباسك اياه

 

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


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

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

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


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