عرض مشاركة واحدة
  #3  
قديم 27-04-2012, 11:13 PM
msk325 msk325 غير متواجد حالياً
عضو نشيط
 
تاريخ التسجيل: Jun 2008
المشاركات: 188
معدل تقييم المستوى: 17
msk325 is on a distinguished road
افتراضي الاجابة

الاجابة

1- لايجوز لان كلمة For من الكلمات المحجوزة
2- عمر الطالب يتم تخزينه في متغير من النوع Single
3- امر تكرار يتوقف عند تنفيذ مجموعة من الاوامر المراد تكرارها عندما يكون شرط نهاية التكرار خطا............Do ...... Loop While




Dim x, sum, avg AsInteger


sum = 0


x = 0

DoWhile x < 5

sum = sum + x

x = x + 1
Loop
avg = sum / x












الناتج



sum=10


x=5



avg=2
__________________

مع تحيات ا / محمد سلامه