بارك الله لك

عذرا ...
رقم 5 خطأ لماذا ؟؟؟

جزاك الله خير

ممكن pdf يا استاذ ..

http://i57.servimg.com/u/f57/17/69/04/34/sabery10.jpg
www.thanwya.com/vb/showthread.php?t=599135

جزاكم الله وبارك الله فيكم

جزاكم الله وبارك الله فيكم

جزاك الله خير

سؤال للاستاذ الكريم / أحمد قرني
 

مشكور أخي الكريم ولي سؤال بسيط أستاذ أحمد
لماذا أجبت على النقطة 5 بالسؤال الأول بالخطأ والسؤال لم يحدد هل قيمة العداد M قبل NexT أم بعدها ، هل السؤال بهذا الشكل يعتبر افتراضا أنه يطلب قيمة العداد بعد Next ؟؟
فقيمة العداد قبل Next يساوي 2 وعليه فالاجابة ( صح ) وبعد Next يساوي ( صفر ) وعليه فالإجابة ستكون ( خطأ ).
كما أرجو ملاحظة أن هذه المشكلة سوف تؤثر في إجابة السؤال الأخير
مشكور أخي الكريم لسعة صدرك ...

الف الف شكر

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

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

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

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

والله أنا تعبتك معايا لكن سؤال الطالب سيكون حول هذه النقطة
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
التكرار هنا يتوقف عند الصفر
سؤالي الطالب سيضع القيمة على أساس أي من الاثنين

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



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

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

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

لو سمحت السؤال التالت ثانيا غير موجود حلة ياريت حضرتك تكتب الاجابة وجزاك الله خيرا

انا لاحظت انا هناك اختلافات فى قيمه العداد ارجوا توضيحها بالامثله يعنى قيمه التكرار هل تختلف هى الاخرى وكيف تظهر
واتمنى ايضا عمل جزء خاص لشرح for next

رجاء يا استاذ احمد ان تكتب لنا حضرتك قيمة المتغير c,k هتكون كام فى السؤال الثالث ثانيا

مشكورررررررررررررررررر
بارك اله فيك

- تحدث الأخطاء المنطقية Logic Errors عند كتابة الكود بصورة غير سليمة ( × )
الاخطاء عند كتابة الكود ( اخطاء املائية ) ام اخطاء منطقية
وما الفرق بين الاخطاء الاملائية والنحوية والمنطقية
وشكرررررررررررا

ممكن حد يعرفني ازاي أحل المسائل دية .
Dim N, K , C As Integer
C = 10
For N = 1 To 10 Step 5
K = K + N
Next
IF N >= C Then
C = C + 1
End If

ممكن طلب شرح لهذا الكود ولماذا النتيجة ال c 11 و k 7
Dim N, K , C As Integer
C = 10
For N = 1 To 10 Step 5
K = K + N
Next
IF N >= C Then
C = C + 1
End If

انا مش فاهمه اخر سؤال

فى البداية هنفذ الكود ده الاول
For N = 1 To 10 Step 5
K = K + N
Next

قيمة n
المرة الاولى للتكرار
n = 1
ويتم تكرار االمر k = k + n
بالتعويض عن قيمة k = 0 لانه لم يعطى قيمة لها وبالتعويض عن قيمة n = 1 ومنها تصبح قيمة k = 1

المرة الثانية للتكرار
n = 6
ويتم تكرار الامر k = k + n مرة ثانية
بالتعويض عن قيمة n = 6 وفيمة k = 1 ومنها تصبح قيمة k = 7

يتوقف التكرار عند قيمة n = 11 وينفذ ما بعد next واللى هو الكود ده

IF N >= C Then
C = C + 1
End If

قيمة الشرط n > = c يعنى 10=< 11 تبقى true ننفذ ما بعد Then وهو الامر c = c +1 وبالتعويض عن قيمة c = 10 ومنها تصبح قيمة c = 11

فى البداية هنفذ الكود ده الاول
For N = 1 To 10 Step 5
K = K + N
Next

قيمة n
المرة الاولى للتكرار
n = 1
ويتم تكرار االمر k = k + n
بالتعويض عن قيمة k = 0 لانه لم يعطى قيمة لها وبالتعويض عن قيمة n = 1 ومنها تصبح قيمة k = 1

المرة الثانية للتكرار
n = 6
ويتم تكرار الامر k = k + n مرة ثانية
بالتعويض عن قيمة n = 6 وفيمة k = 1 ومنها تصبح قيمة k = 7

يتوقف التكرار عند قيمة n = 11 وينفذ ما بعد next واللى هو الكود ده

IF N >= C Then
C = C + 1
End If

قيمة الشرط n > = c يعنى 10=< 11 تبقى true ننفذ ما بعد Then وهو الامر c = c +1 وبالتعويض عن قيمة c = 10 ومنها تصبح قيمة c = 11

ممكن حل هذه المساله
dim a,b,c as integer
b=10
c=b/2
for a=6 to 3 step -3
b=b-1
c=c-1
next
msgbox (a
msgbox (b
msgbox (c

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

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

المسالة الاخيرة عليها كام درجة

محافظة دمياط 2014 ترم ثاني
 

امتحان محافظة دمياط الفصل الدراسي الثاني 2014

امتحان محافظة دمياط 2014 بصيغة Pdf
الرجاء الافاده في السؤال الاول النقطة الثالثة ( تعديل اجابة النقطة الثالثة هتبقى صواااااب )
لتعم الفائده

شكرا وجزاكم الله خيرا
بس هو ده الامتحان كامل شىء عجيب لمحافظة دمياط

ملحوظة النقطة الثالثة تبقى الاجابة صحيحة