مشكووووووووووووووووووووووووووووووووووووووووووووووو وووووووووووووور

الطالب يتعلم النظري لكي يطبقه عمليا ، وعندما يختلف النظري عن العملي فلابد أن يكون هناك خطأ .
وفي النهاية ما زلنا مختلفين في إجابة سؤال
ولكننا والحمد لله ما زلنا متفقين في ثقافة الاختلاف التي أراها هي أكبر مشكلة تعاني منها مصرنا الحبيبة في هذه الأيام .

العداد هاينفذ ماجاء فى داخل جملة for , next حتى يصل الى القيمه النهائيه و هى 18 ثم بمروره على next تتغير القيمه بمقدار الخطوة و هى هنا -2 فيكون قيمته 16 وبمقارنة البدايه بالنهايه فى جملة for نجد انها اقل منها مما يعمل على عدم الخول فى جملة التكرار وتكون قيمة العداد هى 16

Dim I as integer
For i= 20 to 18 step -2
Next
Msgbox(i)
I=16
وشكرا

إسمح لى حضرتك أشرحها لك

قيمة بداية التكرار 20 و النهاية 18

أول قيمه يقرأها العداد 20 ثم يقارنها بالقيمة النهائيه اللى هى 18 فيجدها أكبر منها
فيقوم بتنفيذ الأوارمر بين for و next إن وجد

و يذهب مرة أخرى لـ for بعد خصم 2- فتصبح I بـ 18 و يقارنها بالقيمة النهائية اللى هى 18 فيجدها تساويها
فيقوم بتنفيذ الأوارمر بين for و next إن وجد

و يذهب مرة أخرى لـ for بعد خصم 2- فتصبح I بـ 16و يقارنها بالقيمة النهائية اللى هى 18 فيجدها أقل منها
فيتوقف و يخرج من loop لبعد next

ليجد من يسأله عن قيمة I

و هى آخر قيمة عنده فى الذاكرة قرأها و هى 16

و تقدر حضرتك تجرب على البرنامج

و تحت أمرك فى أى أسئلة

ينتهى التكرار عندما نقوم بمقارنة القيمة فى التكرار بالقيمة النهائية ولان التكرار هنا من 20 الى 18 بمقدار 2-
فنقول 20 عندما نقارنها بالقيمة 18 اذا لم نصل للقيم النهائية
فتتم تكرار العملية بالقيمة 18 وبمقارنة القيمة 18 بالقيمة النهائية للعداد نجد بذكل ان الامر تحقق قتنتهى عملية التكرار

السؤال الاول النقطة 1 مختلف لفهم السؤال
والسؤال الاول النقطة 2 الاجابه خطأ أكيد لان القيمة الحرفية توضع بين علامتي تنصيص

والسؤال الخامس النقطة الرابعة الاجابه 16 لاخلاف فيها
قيمة I فى السؤال الأخير ستكون بعد إذنك 16

لأنها آخر قيمه يقرأها و يقارنها و يخرج من loop

و بعد إذنك جربها على البرنامج


Dim I as integer
For i= 20 to 18 step -2
Next
Msgbox(i)
I=16
وشكرا

مع إحترامى الكامل لشخص حضرتك


I= 14

حضرتك ضع الكود اللى حضرتك كتبته فى برنامج vb و ستجد الإجابه هى

I=14

و العملى هو أكبر دليل على صحة كلامى

انظر الى ناتج عملية التكرار فى هذا الامر
for i = 49 to 21 step -7
القيم للامر
49 42 35 28 28 21
اذا اخر قيمة هى 21 وهى القيمة النهائية للعداد

الأستاذ طارق

أمتحان البحيرة

i=16


مسألة حضرتك

i=14


و العملى هو الفيصل بيننا

و شكراً

اولا السؤال الأول صح لو هو سمى الاداة بالاسم timer لكن الاجدر بالاجابة ان تكون خطا لان العبرة بالتنفيذ على الجهاز وليس بكثرة الكلام ورفع الصوت والثانى خطا والثالث خطا والرابع صح
اما السؤال dim dim اى الرابع لا بد ان يشير الطالب انها مكرةة مرتين ويجب ان تكون مرة واحدة حتى يظهر الناتج (6-7-9-12)
اما السؤال الخامس فهو اجابته 1- 5 لانه ذكر نوع المتغير صحيح اى integer اما 3- ىفهى سهلى 12 اما رقم 4) قهى لابد ان نسئل نفسى كيف اخرج من التكرار لو اخترت 18 هل سنخرج لتنفيذ ما اسفل next الاجابة لا طبعا لاننا سنكون داخل دائرة التكرار وبالتالى الخروج بقيمة 16 هو الحل وحاول تنفذ التمرين على الجهاز لتحصل على الحل لذللك قية I=16
وفى النهاية اقول شكرا لواضع الامتحان الاستاذ / سمير الكلاف لان الامتحان هو اتجاه صحيح للتعامل مع المناهج بالعقل والتفكير وليس بالشحن والتفريغ .
العبد الفقير الى الله (حسن كونه)

بعد إذن حضرتك

آخر قيمة للتكرار فعلاً هى 21

أما آخر قيمة فى الذاكرة خارج التكرار هى 14

أى أن هناك قيمتين

إذا وضع مربع رسالة داخل التكرار كانت آخر قيمة هى 21

و إذا وضع مربع رسالة خارج التكرار كانت آخر قيمة هى 14

و إذا لم يضع مربع رسالة أصلاً فيكون قصده القيمة خارج التكرار

و لكن فى حالة إمتحان البحيرة المسألة واضحة لا جدال فيها
حيث سأل عن I بعد next أى خارج التكرار


أرجو أكون قد وفقت فى الشرح

و شكراً



على فكرة الأستاذ الساهر 2011

جرب عملى الأمور ستتضح لك و تكون سهلة و مقنعة للغايه

حضرتك تقول

اولا السؤال الأول صح لو هو سمى الاداة بالاسم timer لكن الاجدر بالاجابة ان تكون خطا لان العبرة بالتنفيذ على الجهاز


كيف تكون خطأ إذا كان العبرة كما تقول حضرتك بالتنفيذ على الجهاز
و التنفيذ على الجهاز يقول صح

أرجو التوضيح للإفادة و شكراً لك

nahla m
شكرا على التوضيح
جزاك الله خيرا

شكرا انا كنت أقصد
أمتحان البحيرة

i=16
ولكنى كتبت خطأ


Dim I as integer
For i= 20 to 18 step -2
Next
Msgbox(i)
I=16

اما
Dim I as integer
For i= 20 to 15 step -2
Next
Msgbox(i)
I=14
وشكرا


وشكرا


وطبعا اجابت حضرتك صح على

تنفيذ الأمر Me.Timer.Enabled = true
على الجهاز غير صحيح هذا بدون تغيير اسم الأداة التي لم تذكر في الامتحان على الإطلاق
ثانيا أرجو الإجابة على هذه الأسئلة هل هذه الأكواد صجيحة أم خاطئة
1- dim A As Enteger
2- Button1.Vosible= true
3- Omar.Enabled= false ولم أذكر أنه تم تغيير اسم الأداة
السؤال جاء بصيغة صح أم خطأ وجاء بكود
أي العبرة إذا كان صحيحا أو خطأ هنا هو صحة تنفيذه على الجهاز وليس رأي أي منا
سؤال اختر الإجابة الصحيحة
- لإيقاف عمل أداة الـ timer نكتب الكود التالي
أ - Timer.Enabled = false
ب - Timer1.Enabled = False
ج - أ و ب معا

وبفرض أن أداة timer قد تم تغيير اسمها من خلال خاصية Name كان أجدر بمن وضع السؤال أن يضع اختصار أداة الـ timer وهي Tmr وأعتقد أن هذا ما درسه الطالب ليظهر أنه قد تم تغيير اسم الأداة .
ومع ذلك فأنا أتوقع الآتي
أن واضع الامتحان كتب سهوا Timer ولم يكتب Timer1 وكان غرضه من السؤال أن يسأل الطالب عن وضع Me قبل اداة ال Timer وبالتالي أتوقع ان تكون إجابة نموذج الإجابة أن الإجابة صحيحة وهذه اجابة خاطئة
لأنني لو كتبت كود معتقدا أن كل حروفه صحيحة وعند تنفيذه لن ينفذ هذا يؤكد ان هناك خطأ
مثل Button1.Vosible= true فأنا كتبت Vosible ولم أكتب Visible وهذا ما درسه الطالب .

منه لله اللى كان عامل الامتحان نقصت فيه 3 غلطات وجبت 18.5