طلبات الأعضاء للعام الدراسي 2012-2013

[mahmoudbeso]

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim r, sum As Integer
For r = 5 To 10 Step -1
sum = sum + r
Next
MsgBox(r)

ما هو ناتج البرنامج (0-5-10
)
انا نفذت البرنامج وطلعت 5
ممكن حد يوضح السبب


End Sub

[keralous]

لانه يعمل من الشمال الى اليمين اذن 10-5-0=5 وذلك صحيح

[محمد عيد احمد دسوقى]

البداية 5 والنهاية 10 المقروض الزيادة موجب وليس سالب بمعنى لا يوجد تكرار اذن r=5

[الاستاذ صبري]

r بخمسة لأن البرنامج بدأ بخمسة ونهاية الحلقة بالزياده الي عشرة وقيمة الخطوة سالبه في هذه الحاله العداد لا يتحرك علشان العداد يشتغل لازم يكون نهاية الحلقة أقل من البداية أو قيمة الخطوة تكون موجبة
علشان تشوف كيفية تنفيذ خطوات البرنامج اضغط F10 مع كل خطوة ثم اخرج من التتبع shift+F5

[mahmoudbeso]

شكرا للاساتذه المحترمين الردود الكريمة

اريد مشاركه اكثر من باقي الزملاء لتوضيح هذا البرنامج اكثر

[منى محمد عوض]

قيمة العداد تبدا بالعدد 5 وتنتهى بالعدد 10
أى أول قيمة هى 5 للعداد
ثم يزيد بمقدار الزيادة المفروض تكون موجبة حتى يصل الى 10
ولكن بما انها سالبة فلا يحدث تكرار وتظل القيمة هى 5 فى مربع الرسالة

[زرع وحصد]

لأن r=5 تعتبر القيمة الابتدائية تنفذ الجمل التالية ثم تقل بمقدار -1 فلا يتم التكرار فتكون r=5

[mahmoudbeso]

احتاج أراء اخري
وشكرا لكن من ساهم وشارك برايه شكرا جزيلااااااا

[حسين المليجى]

القيمة ستظل 5 لأنه لايحدث تكرار والقيمة الابتدائية 5 فيأخذ القيمة الابتدائية قيمة له .