عرض مشاركة واحدة
  #327  
قديم 25-03-2013, 06:41 PM
bosyramy bosyramy غير متواجد حالياً
عضو نشيط
 
تاريخ التسجيل: Oct 2010
المشاركات: 156
معدل تقييم المستوى: 15
bosyramy is on a distinguished road
افتراضي

1– حدد قيمة كل متغير بعد تنفيذ الكود Code التالى :

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
ارجو توضيح كيفيه الحصول على المتفير K


لايجاد قيمة K لابد من معرفة عدد مرات التكرار اولا من N

11 , 6 , 1 N
7 , 1 K

عدد مرات التكرار 2
اذن 11 = N
7 = K
1 +C =C
11 =C