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

[lovelomy]

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

[أحـمد قرنى]

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

ممكن طلب شرح لهذا الكود ولماذا النتيجة ال 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

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

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

فى البداية هنفذ الكود ده الاول
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