عفوا معلمي ولكن هذه النقطة اتت في امتحان لهذا العام

هو فيه إجابة للبعض دون الآخر -------- على كل حال شكرًا

ممكن الاجابة على هذا السؤال
Dim n,k,c As integer
c=6
for n = 1 to 6 step 3
k =k +n
next
if n >c then
c =c+1
end if
قيمة المتغير k فى حل اسئلة الوزارة 5 عايز اعرف ليه

عدد مرات التكرار هنا 2 ويتوقف التكرار في المرة الثالثة كالتالي :
N = 1
N = 1 + 3 = 4
N = 4 + 3 = 7
اذن آخر قيمة للمتغير N = 7
وطالما ان التكرار حدث مرتين اذن :
K = K +N
K = 0 + 1 = 1
K = 1 + 4 = 5
اذن آخر قيمة للمتغير K =5
عندما تصل N = 7 يتوقف التكرار وننتقل الى جملة IF ونرى ان قيمة التعبير الشرطي N>Cيساوي True وبالتالي يتم تنفيذ الأوامر التي تلي Then وهي :
C = C + 1
C = 6 + 1 = 7

الاجابات النهائية المطلوبة باللون الأخضر

محذوفات المنهج
 

هل من محذوفات المنهج او الموضوعات الاثرائية If مع الأدوات RadioButton , CheckBox, GroupBox
نعم أم لا لأن المستر قال محذوفة.
نرجو الرد للاطمئنان حيث أنني سوف امتحن يوم الثلاثاء القادم

يا اساتذه المنتدى الكرام الله يخليكوا اشرجوا لنا السؤال الأخير بتاع امتحان الدقهليه الله يباركلكم
ارجوكم الواحد كان ماشى حلو اوى فى الأمتحانات وفجأه الدنيا غيمت

الإجابة

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