امــتــحــانــات المـحـافــظــات تــرم ثـــان 2014 ( واجاباتها )

[سامح عبد العظيم]

ما الخطأ في الكود التالي
dim x as byte= 300

[أحـمد قرنى]

المشاركة الأصلية كتبت بواسطة سامح عبد العظيم

ما الخطأ في الكود التالي
dim x as byte= 300

الخطأ هنا املائى ونحوى لانه خطا فى نوع المتغير

[صالحين]

شكر وتقدير الي كل الاساتذة الافاضل

[ahashem82]

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

[hassanalhawy]

برجاء وضع جميع الإمتحانات بالمشاركة رقم 2 عند ورودها
ولكم جزيل الشكر

[amira mostafa]

من فضلكم ممكن امتحان محافظه الاسماعيلية ترم تانى 2014

[winter4444]

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

[أحـمد قرنى]

المشاركة الأصلية كتبت بواسطة winter4444

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

عذرا اخى الفاضل التكرار سيتوقف عند القيمة صفر
هنا معدل الزيادة بالسالب يبقى لازم عشان يتوقف التكرار تكون قيمة البداية اصغر من قيمة النهاية

[winter4444]

سامحني استاذ أحمد
أين سيكون مربع الرسالة قبل أم بعد Next لأن ذلك غير موجود بالسؤال

[أحـمد قرنى]

المشاركة الأصلية كتبت بواسطة winter4444

سامحني استاذ أحمد
أين سيكون مربع الرسالة قبل أم بعد Next لأن ذلك غير موجود بالسؤال

حضرتك فى حالة عدم وجود مربع الرسالة كما هو فى السؤال فهنا يحتاج قيمة نوع المتغير اللى بعد for واخر قيمة هتخزن به هى القيمة صفر وعندما يقارنها بقيمة نهاية العداد 1 ويجد انها اقل منها يخرج من التكرار عند القيمة صفر

[winter4444]

والله أنا تعبتك معايا لكن سؤال الطالب سيكون حول هذه النقطة
Dim M As Integer

For M = 10 To 1 Step -2
MSGBOX (M
Next
في هذه الحالة التكرار يتوقف عند 2
ــــــــــــــــــــــــــــــــــــــــــــــــــ ـــــــــــــــ
Dim M As Integer
For M = 10 To 1 Step -2
Next
MSGBOX (M
التكرار هنا يتوقف عند الصفر
سؤالي الطالب سيضع القيمة على أساس أي من الاثنين

[أحـمد قرنى]

المشاركة الأصلية كتبت بواسطة winter4444

والله أنا تعبتك معايا لكن سؤال الطالب سيكون حول هذه النقطة
Dim M As Integer

For M = 10 To 1 Step -2
MSGBOX (M
Next
في هذه الحالة التكرار يتوقف عند 2

حضرتك فى حالة وجود Msgbox هنا بيبقى عايز ما يغرض داخل مربع الرسالة وليس قيمة العداد لان بردو قيمة العداد هيعرض اخر حاجة داخل مربع الرسالة 2 ويطلع ينقض -2 يبقى صفر فى الحالة دى يخرج من التكرار وينفذ ما بعد next وهنا مش موجود حاجة يبقى خلص الكود ويبقى اخر ما عرض داخل مربع الرسالة 2
ــــــــــــــــــــــــــــــــــــــــــــــــــ ـــــــــــــــ
Dim M As Integer
For M = 10 To 1 Step -2
Next
MSGBOX (M
التكرار هنا يتوقف عند الصفر
سؤالي الطالب سيضع القيمة على أساس أي من الاثنين

هنا ال msg box بعد كلمة next والمعروف اننا بنفذ ما بعد next لاما ينتهى التكرار وعشان الزيادة هنا بالسالب هيخرج لما تكون قيمة البداية اصغر من قيمة النهاية واللى هى صفر يبقى هيعرض الصفر بس



اما فى حالة عدم وجود msgbox يبقى هنا هيعرض قيمة العداد الاخيرة واللى انتهى هندها التكرار واللى هى صفر

[pola adel]

شكرا يا استاذ احمد

[winter4444]

ناس كتير يا أستاذ أحمد تقف عند هذه النقطة
كيف لا يوجد مربع رسالة لا قبل Next ولا بعدها ويطلب من الطالب قيمة للمتغير
عموما مشكور أستاذي الفاضل على مجهودك ولا حرمنا الله من إخلاصك وعطائك
بارك الله فيك ... آمين

[رزق درديري]

المشاركة الأصلية كتبت بواسطة winter4444

ناس كتير يا أستاذ أحمد تقف عند هذه النقطة
كيف لا يوجد مربع رسالة لا قبل Next ولا بعدها ويطلب من الطالب قيمة للمتغير
عموما مشكور أستاذي الفاضل على مجهودك ولا حرمنا الله من إخلاصك وعطائك
بارك الله فيك ... آمين

بارك الله فيك