|
||||||
| أرشيف المنتدى هنا نقل الموضوعات المكررة والروابط التى لا تعمل |
|
|
أدوات الموضوع | ابحث في الموضوع | انواع عرض الموضوع |
|
|
|
#1
|
|||
|
|||
|
Dim N, K, C As Integer
C = 10 For N = 1 To 10 Step 6 K = K + N Next If N <= C Then C = C + 2 End If ( MsgBox("C =" & C & " " & "K=" & K & " " & "N=" & N تكون قيمة N بعد انتهاء التكرار 13 قيمة C = 10 لان الشرط خطأ لانه لن ينفذ مايلي next الا اذا اصبحت قيمة N = 13 عند اختبار الشرط نجد ان If N <= C Then الشرط خطأ قيمة K = 8 |
| العلامات المرجعية |
| أدوات الموضوع | ابحث في الموضوع |
| انواع عرض الموضوع | |
|
|