عرض مشاركة واحدة
  #2  
قديم 25-03-2013, 08:38 PM
سلمىاحمد سلمىاحمد غير متواجد حالياً
عضو جديد
 
تاريخ التسجيل: Feb 2013
المشاركات: 29
معدل تقييم المستوى: 0
سلمىاحمد is on a distinguished road
افتراضي جزاك الله كل خير عن المجهود المبذول

ممكن اجابة عن السؤال التالى
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
حدد قيمة كل متغير بعد تنفيذ الكود Code التالى
رد مع اقتباس