هااااام الي الأستاذ احمد قرني والأستاذ سيف سالم

[أحمد هاشم الزيدي]

الرجاء الإجابة علي هذه الإسئلة مع الشرح

Sum = 0

X = 0

Do While X<5

Sum = Sum + X

X = X + 1

Loop

Average = Sum / X

بعد تنفيذ التعليمات السابقة تكون :
أ‌-قيمة X تساوى ...... ( 4 - 5 - 0 )
ب‌-قيمة Average تساوى ...... ( 3 - 2.5 - 2 )

الكود الثاني

4- بعد نهاية تنفيذ الكود التالى :

K = 1

For I = 1 to 5

K = K*2

Next

تكون قيمة I , K هى :
I = ………… ( 6 - 5 - 1 )
K = ………… ( 1 - 16 - 32 )

الرجاء الإجابة للأهمية

[الأستاذة / أم أمل]

Sum = 0

X = 0

Do While X<5

Sum = Sum + X

X = X + 1

Loop

Average = Sum / X

بعد تنفيذ التعليمات السابقة تكون :
أ‌- قيمة X تساوى ...... ( 4 - 5 - 0 )
ب‌- قيمة Average تساوى ...... ( 3 - 2.5 - 2 )

الكود الثاني

4- بعد نهاية تنفيذ الكود التالى :

K = 1

For I = 1 to 5

K = K*2

Next

تكون قيمة I , K هى :
I = ………… ( 6 - 5 - 1 )
K = ………… ( 1 - 16 - 32 )

[سيف سالم]

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

الرجاء الإجابة علي هذه الإسئلة مع الشرح

sum = 0

x = 0

do while x<5

sum = sum + x

x = x + 1

loop

average = sum / x

بعد تنفيذ التعليمات السابقة تكون :
أ‌-قيمة x تساوى ...... ( 4 - 5 - 0 )
ب‌-قيمة average تساوى ...... ( 3 - 2.5 - 2 )

الكود الثاني

4- بعد نهاية تنفيذ الكود التالى :

k = 1

for i = 1 to 5

k = k*2

next

تكون قيمة i , k هى :
i = ………… ( 6 - 5 - 1 )
k = ………… ( 1 - 16 - 32 )

الرجاء الإجابة للأهمية

جزاكم الله كل خير

[أحـمد قرنى]

[QUOTE=mido_elzedy;4382680]الرجاء الإجابة علي هذه الإسئلة مع الشرح

Sum = 0

X = 0

Do While X<5

Sum = Sum + X

X = X + 1

Loop

Average = Sum / X

بعد تنفيذ التعليمات السابقة تكون :
أ‌-قيمة X تساوى ...... ( 4 - 5 - 0 )
ب‌-قيمة Average تساوى ...... ( 3 - 2.5 - 2 )

الكود الثاني

4- بعد نهاية تنفيذ الكود التالى :

K = 1

For I = 1 to 5

K = K*2

Next

تكون قيمة I , K هى :
I = ………… ( 6 - 5 - 1 )
K = ………… ( 1 - 16 - 32 )

[أحمد هاشم الزيدي]

معليش فين الشرح ليهم

[mahgooz]

ممكن بس انا عايز ارفع او اشارك بكلمات جميلة ممكن

[hassanalhawy]

ممكن حضرتك تكتبهم بالشكل ده فى نافذة الكود وحيطلعلك النتيجة دى:

Sum = 0

X = 0

Do While X<5

Sum = Sum + X

X = X + 1

Loop

Average = Sum / X
MsgBox(X)
MsgBox(Average)

بعد تنفيذ التعليمات السابقة تكون :
أ‌-قيمة X تساوى ...... ( 4 - 5 - 0 )
ب‌-قيمة Average تساوى ...... ( 3 - 2.5 - 2 )

الكود الثاني

4- بعد نهاية تنفيذ الكود التالى :

K = 1

For I = 1 to 5

K = K*2

Next

MsgBox(I)

MsgBox(K)
تكون قيمة I , K هى :
I = ………… ( 6 - 5 - 1 )
K = ………… ( 1 - 16 - 32 )

[زياد_عاطف]

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

Sum = 0

X = 0

Do While X<5

Sum = Sum + X

X = X + 1

Loop

Average = Sum / X

بعد تنفيذ التعليمات السابقة تكون :
أ‌- قيمة X تساوى ...... ( 4 - 5 - 0 )
ب‌- قيمة Average تساوى ...... ( 3 - 2.5 - 2 )

الكود الثاني

4- بعد نهاية تنفيذ الكود التالى :

K = 1

For I = 1 to 5

K = K*2

Next

تكون قيمة I , K هى :
I = ………… ( 6 - 5 - 1 )
K = ………… ( 1 - 16 - 32 )

===============================================

Dim sum, x, average As Single

sum = 0
x = 0
Do While x < 5
sum = sum + x
x = x + 1
Loop
average = sum / x
MsgBox(" After Loop " & vbCrLf & " X =" & _
" " & x & vbCrLf & " Sum = " & " " & sum _
& vbCrLf & " Average = " & " " & average, , "Atef Mahdy")

================================================== ======

Dim i, k As Byte
K = 1
For I = 1 To 5
K = K * 2
Next
REM تكون قيمة I , K هى : I = ………… ( 6 - 5 - 1 ) K = ………… ( 1 - 16 - 32 )

MsgBox(" After Reapting " & vbCrLf & " I =" & _

" " & i & vbCrLf & " K = " & " " & k , "Atef Mahdy")

=================================

عاطف مهدى حسان - ميت موسى

[usama_usama2005]

مشكور و بارك الله فيك

Sum = 0

X = 0

Do While X<5

Sum = Sum + X

X = X + 1

Loop

Average = Sum / X
MsgBox(X)
MsgBox(Average)

بعد تنفيذ التعليمات السابقة تكون :
أ‌-قيمة X تساوى ...... ( 4 - 5 - 0 )
ب‌-قيمة Average تساوى ...... ( 3 - 2.5 - 2 )

الكود الثاني

4- بعد نهاية تنفيذ الكود التالى :

K = 1

For I = 1 to 5

K = K*2

Next

MsgBox(I)

MsgBox(K)
تكون قيمة I , K هى :
I = ………… ( 6 - 5 - 1 )
K = ………… ( 1 - 16 - 32 ) __________________