امتحان الدقهلية
 

عاوزين الحل إذا سمحت استاآذى الكريم

وبالذات المسألة الاخيرة ,,

قيمة المتغير w هي 1
قيمة المتغير y هي 6
قيمة المتغير z هي 11

اجابة for next
بفرض ان المتغير اسمه i
for i = 1 to 10 step 2

طيب ممكن طريقة الحل ؟!

dim a , total as integer
for a=1to 10 step 2
total=total+a
next
(messagebox.show(total

الاجابة :-
1- التكرار 2- timer
3- Radio Button
4- مللي ثانية 5- Dim
6- التعبير الشرطي
ب :- الكود
for counter = 1 to 10 step2
total = total + counter
next
msgbox( total

يا جماعة حد يوضع الامتحان عشان نشوفه

شكرا على الاجابة

توزيع الدرجات لوسمحت

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

الامتحان في فكر بس اشرح اخر مسالة انا عملت w =1 بس y.z غلط

ازاي المسألة دي تتحلل

على اد فهمي المتواضع

قيمة z = 5 ونسى الاخ واضع الامتحان ان ده عبارة عن عداد لان المسألة مبنية على العداد

المهم
لما تنفذ العداد حيجلك انه حيزيد بمقدار 2

يعني قيمة z حتكون 2 ثم اربعة

يعني الكونتر z حيلف مرتين خلوا بالكم

تعال دور على قيمة x و y

المفروض انهم برده حيتم تدوريهم مرتين

بس فين القيم بتاعتهم القيم بتاعتهم صفر
تعال دور على w اللفة الاولى قيمته 4 -1 = 3
الفة الثانة 3-1 = 2
اذا قيمة ال w = 2

وهنا واضع الامتحان ذكي جبلك قاعدة if وقالك ده اكبر من ده

قيمة y اكبر من z طبعا غلط لان y = صفر كقيمة ابتدائية للمتغير الرقم الصحيح اذا ما سيأتي بعد كلمة if لا يتحقق لانه شرط فردي

اذا قيمة = 4 بعد الدوران قيمة w = 3 قيمة y = 0

ياريت الاساتذة يشاركوني الراي

آآه .. أنا اتلخبطت فى الاخيرة
مخدتش بالى من السلاش ... وعملتها 1.5
ممكن اعف هيتحسبلى عليها أد ايه ؟؟

وفى مسئلة فور ونكست .. لازم نكتبSum = 25 ولا مش لازم ؟؟

نموذج اجابة امتحان الدقهلية 2011
 

امتحان رائع
ويحترم المادة

إضافة في نموذج اجابة امتحان الدقهلية 2011
 

بالنسبة لFor next
اكتب الكود
اكمل الكود
لايوجد فى الاسئلة مكان علشان اكمل ولا انا سوف اكتب الكود من الاول

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

الى الإستاذ البنان واو ازاى طلعت القيم دى والشرط اصلا بعد جمله غير صحيح وبالتالى مش هينفذ ال بعد then ارجو الإفاده منك جزاك الله خيرا

يا استاذ اشرح لو سمحت كيف حليت المسألة الاخيرة

كيف عوضت عن العداد بصفر في الاول وكيف عوضت عنه في الثاني والثالث

وكيف فيه عدد ويكون فيه قيمة ابتدائية في الاول

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

Dim x, y, w, z As Integer

z = 5
w = 4
For z = 2 To 4 Step 2
y = y + x
w = w - 1

Next
If y > z Then
w = w \ 2
z = z + y

End If
MsgBox(w)
MsgBox(y)
MsgBox(z)



w=2
y=0
zz=6

ارجو رفع امتحان المنيا

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

ياريت تجيبولنا توزيعة الدرجات ضرورى

الاجابة
w=1
z=11
y=6
مع العلم بأن الشرط صحيح لأن y قيميتها 6 أكبر من z وبذلك ننفذ الأوامر التي تلي then لصحة الشرط

قيمة y = 0
قيمة x=0
القيم الموجودة هى قيمة z , w

بجد امتحان رائع

في رأي
w=2 ok
y = 0 ok
z القيمة العليا للعداد = 4

مكتوب next يعني اخر العداد

منين جبت قيمة الـ y اذا كانت بتساوي صفر
ده متغير ما اعطي له قيمة ولا اعطى للـ x قيمة
وازاي الاكس زوت عليها اثنين بناء على ايه الزيادة بتاعتها
الكونتر هو اللي بيزيد بمقدار 2
قال 2+x=x
كان يبقى كلام تاني
قيمة الاكس بصفر و الـ z بصفر

الملفات المرفقة http://www.thanwya.com/vb/life/attach/doc.gif اجابه امتحان الحاسب الآلي محافظة الدقهلية الفصل الدراسي الثاني للعام الدراسي 2010-2011.doc‏ (51.5 كيلوبايت, المشاهدات 10)

دائما قيمة العداد بتزيد عن القيمة النهائية بمقدار الStep
ولكن التكرار يقف
بمعنى ان العملية الحسابية لن تتحقق

امتحان جميل
داايما محافظة الدقهلية هي اللي بتصنع الاسئلة مش بتنقلها من المحافظات السابقة

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

بجد امتحان روعة والله العظيم :) :)
وكانت المسألة الأخيرة دي جميلة وغير مسبوقه .. بس نفس الفكرة برضه
وبتاعت sum دي كانت حلوة برضه =)
الحمد لله كان كويس جدا وفي مستوى جميع الطلاب

اخي الكريم ناتج الشرط True وبالتالي سيتم تنفيذ ما بعد Then
وذلك لأن عند الاعلان عن متغير فهذا المتغير له اسم ونوع وقيمة وبما أن سطر الاعلان لم يضع قيمة وهو من نوع رقمي فيأخذ قيمة افتراضية 0 وبعد ذلك يأخذ المتغير Z القيمة 5 وأخر قيمة للمتغير Y قبل الشرط تكون 6
أما لماذ ناتج الشرط True وذلك أثناء الشرط تكون قيمة Y =6 وقيمة Z = 5 وبالتالي ناتج الشرط True

عوضت عن العداد بصف وذلك لأن عند الاعلان عن متغير فهذا المتغير له اسم ونوع وقيمة وبما أن سطر الاعلان لم يضع قيمة وهو من نوع رقمي فيأخذ قيمة افتراضية 0 وعايز تتأكد من كلامي اكتب البرنامج التالي
PrivateSub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim X, Y, W, Z AsInteger
MsgBox(X)
MsgBox(Y)
MsgBox(W)
MsgBox(Z)
EndSub

حضرتك ممكن تطلع على الامتحان قيمة y =0 وقيمة x =0
وبالتالى عند تكرار المعادلة y = y + x لن تتغير قيمة y وستظل صفر .

ما هو الحل الصحيح من وجهة نظرك

في أول مرة قيمة x=0 قبل التكرار ولكن أول مرة تكرار ستكون قيمة x= 2 وبالتلي ستكون المعادلة y=y+x في أول مرة ستكون قيمة y =2

أولا قيمة X عند الإعلان تكون 0 ولكن في أول مرة تكرار تكون قيمة X=2 وبعد ذلك تكون قيمة x= 4 في ثاني مرة تكرار .

قيمة X=0 قبل التكرار وفي أول مرة تكرار تكون قيمة X=2
وبالتالي تكون قيمة المعادلة Y=Y+X تكون تساوي 2
وحضرتك تقدر تتأكد من كلامي بكتابة البرنامج التالي
Dim X, Y, W, Z AsInteger
Z = 5
W = 4
For X = 2 To 4 Step 2
Y = Y + X
W = W - 1
Next
If Y > Z Then
W = W \ 2
Z = Z + Y
MsgBox(W)
MsgBox(Y)
MsgBox(Z)
EndIf

حضرتك المسألة موجودة فيها For z = 2 to 4 step 2 يعنى z هى اللى بتزيد مش x .

2
0
4
---------------------------------

حضرتك كاتب في الامتحان العداد z مش x

ياجماعه انا معيد ف كليه الحاسبات واجابه السوال الأخير ف ماده الحاسب الالى لتالتهاعدادى محافظه الدقهيله هى وده كمان بعد تنفيذ البرنامج على الجهاز عمليا وهى
1 - قيمة المتغير W = 2
2- قيمة المنتغير y = 0
3- قيمة المتغير Z = 6 وهىالقيمة التى يتوقف عندها التكرار
واى حد يقول اى اجابه تانيه تبقى غلط