طلبات السادة الأعضاء للعام الدراسي 2015-2016

[سلمىاحمد]

ارجو شرح اجابه السؤال الثالث فى نماذج الامتحانات ص 102
وهو
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

[أحـمد قرنى]

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

ارجو شرح اجابه السؤال الثالث فى نماذج الامتحانات ص 102
وهو
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

قيمة المتغير n هتكون n = 1 , 6 وعند القيمة n = 11 هيخرج من التكرار وبالتالى يكون عدد مرات التكرار مرتين فقط

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

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

عند قيمة المتغير n = 11 يخرج من التكرار وينفذ ما بعد next
يعنى هينفذ جملة if واللى هى if n >= c وعندنا قيمة n = 11 وقيمة المتغير c = 10 نلاحظ ان هنا قيمة الشرط n > = c تكون true يعنى هينفذ ما بعد كلمة then وهى المعادلة c = c + 1 وبالتعويض عن قيمة c = 10 اذا تصبح قيمة c = 11

يعنى كدة قيمة n = 11 k = 7 c = 11

اتمنى اكون وفقت فى شرح المثال

[سلمىاحمد]

جزاك الله خيرا على المجهود الرائع وجعله فى ميزان حسناتك