بوابة الثانوية العامة المصرية - سؤال في الأمر For ... Next

بوابة الثانوية العامة المصرية (https://www.thanwya.com/vb/index.php)

- حاسب آلى 3ع ترم2 (https://www.thanwya.com/vb/forumdisplay.php?f=1965)

- - سؤال في الأمر For ... Next (https://www.thanwya.com/vb/showthread.php?t=419297)

:d:d:dزميلي العزيز الامرfor next يقوم بزيادة قيم العداد حتي تكون قيمته اكبر من او تساوي قيمة النهاية ولا يتوقف الا في هذه الحالة ولكن جملة التكرار يتم تنفيذها اذا كانت قيم العداد اقل من او تساوى قيمة النهاية وبذالك فان العداد يتوقف عند القيمة 9 ولكن لايتم تنفيذ التكرار عندها............ lmmmmmmmmmmm

اقتباس:

المشاركة الأصلية كتبت بواسطة عمر 25 يناير (المشاركة 4438967)

قيمة N = 7
قيمة K = 5
قيمة C = 7
ناتج الشرط n >c then يكون True

ممممممممم إزاى n=7
ونهايه العداد بـ 6 ؟؟؟ إنت كده عديت قيمة end وقاعدة for-next لا تسمح ان تكون قيمة العداد تتعدى قيمة end

يعنى N= 1 , 4 ( تم التكرار مرتين )

أما k فطالما مالهاش قيمة فى البدايه فـ يتم التعويض بـ صفر
k=k+n
k=0+1
=1

وبما إن عدد مرات تكرار n مرتين
حيتم تكرار k أيضا مرتين

فتكون ( حنعوض بقيمه n , k الجداد )
k=k+n
k=1+4
=5

أما بقى ناتج الشرط if n >c يكون false

لإن n=4 , c=6

وطالما الشرط خطأ يبقى لن يتم تنفيذ الأمر c=c+1

وحتظل قيمة c كما هى c=6

الناتج النهائى

N=4
K=5
C=6

شكراً .. ولو فيه خطأ أتمنى التوضيح

dim n,k,c as ingager

c=6

for n=1 to 6 step 3

k=k+n

next

if n >c then

c=c+1

enf if
اوجد قيم n c k

قيمة N = 7
قيمة K = 5
قيمة C = 7
ناتج الشرط n >c then يكون True

*************************************
في الامر for , next

for n=1 to 6 step 3

k=k+n

next
اذا لم يذكر msgbox فهل قيمة n تساوي 4 ام 7

اقتباس:

المشاركة الأصلية كتبت بواسطة winter4444 (المشاركة 4437510)

السلام عليكم ورحمة الله وبركاته
أرجو أن أجد إجابة لسؤالي هذا :
For r = 1 To 8 Step 2
(MsgBox (R
Next
يتوقف التكرار في الحالة السابقة عند الرقم 7
For r = 1 To 8 Step 2
Next
(MsgBox (R
يتوقف التكرار في هذه الحالة عندما تكون قيمة R = 9
فما الفرق بين الحالتين ؟؟؟
أرجو من الأخوة سرعة الرد جعله الله في ميزان حسناتكم

=========================
فى الحالتين كلتاهما sسيتم التكرار طالما أن قيمة العداد R هى 7 بعدها يتم زيادة قيمة العداد بمقدار الزيادة 2 لتصبح قيمة العداد R هى 9 فيتوقف التكرار
-------------------------------------------:028ja7:
الفرق هنا فى مكان الأمر( MsgBox (R ففى الجملة الأولى الأمر فى نطاق التكرار فيتم طباعة قيم R و هى بالترتيب 1 ثم 3 ثم 5 ثم 7 ثم ينتهى التكرار
اما فى الجملة الثانية الأمر بعد نهاية التكرار حينئذ اصبحت قيمة R بعد نهاية التكرار هى آخر قيمة لها فى التكرار + مقدار الزيادة أى 7 +2 = 9 لذلك سيتم طباعة العدد 9 فقط
=====================
عاطف حسان / ميت موسى

الاستاذ المحترم / احمد قرني ...
كما اوضح لك الزميل mahgooz أو الأستاذ / محمد رمضان قيمة x كانت بتساوي 2.5 ولذلك فان قيمها ستكون كما ذكرها الأستاذ محمد رمضان 5 و 10 و 20 و 40 وطبعا لوطلب طباعتها في النهاية ستكون 40 ..اعرف انها مسألة بديهيه وقد احسنت حضرتك في شرحها فقط اردت ان الفت النظر حتى لا يظن البعض انك قد اخطأت ..حضرتك فقط حسبتها على انها X= 2 لكم جميعا موفور الشكر والتقدير