[رزق درديري]

المشاركة الأصلية كتبت بواسطة noorehan

Dim x , sum as Integer
X = 1
Sum = 0
Do While X < 5
Sum = sum + x
X = x + 1
Loop
Average = Sum / x

قيـــمة x = ......
قيمة Average = .......

ياريت الرد ارجوكم
شكرا

x = 5
sum=10
Average = Sum / x
= 2