اهلا وسهلا بك فى بوابة الثانوية العامة ... سجل الان

Prev المشاركة السابقة   المشاركة التالية Next
  #1  
قديم 07-05-2016, 02:42 AM
hassantawfic hassantawfic غير متواجد حالياً
عضو جديد
 
تاريخ التسجيل: Dec 2009
المشاركات: 29
معدل تقييم المستوى: 0
hassantawfic is on a distinguished road
افتراضي ممكن اجابه السؤال

Dim X , Y , I As Integer
X = 4 ^ 2 + 3
Y = 2 ^ 3 + 5
If X > Y Then
For I = 4 To 13 Step 4
X = X – 1
Y = Y + 1
Next
Else
X = X + 3
Y = Y * 2
I = X – Y
End If
Msgbox (X )
Msgbox ( Y)
Msgbox ( I )
اوجد
1- عدد مرات التكرار
2- قيمة x
3- قيمة Y
4- قيمة I

رد مع اقتباس
 

العلامات المرجعية

أدوات الموضوع
انواع عرض الموضوع

ضوابط المشاركة
لا تستطيع إضافة مواضيع جديدة
لا تستطيع الرد على المواضيع
لا يمكنك اضافة مرفقات
لا يمكنك تعديل مشاركاتك

BB code متاحة
كود [IMG] متاحة
كود HTML معطلة

الانتقال السريع


جميع الأوقات بتوقيت GMT +2. الساعة الآن 02:19 AM.