انت تسأل وجميع الاساتذة تجيب

[أحـمد قرنى]

[quote=نهال18;3355204]

Dim Computer, English ,Total ,Aag As Integer

computer=40
English=20
If Comuter >30 Then
Total= Computer+ English
Avg= Total/2
Else
Computer=30
English=26
Total= Computer+ English
Avg= Total/2
End If

ضع علامة صح او خطأ

1- قيمة المتغير Computer تساوى 40 ( صــح )
وذلك لعدم وجود قيمة للمتغير computer بعد كلمة then فنأخذ القيمة الاصلية له وهى 40 .
2- قيمة المتغير English تساوى 26 ( خـطـأ)
3- ناتج التعبيرComuter >30 يكون True ( صــح)
4-قيمة المتغير Total تساوى 56 ( خطأ)
قيمة total = 40 + 20 = 60

5-قيمة المتغير Avg تساوى 28 ( خطأ)
قيمة Avg = 60 / 2 = 30

فى قاعدة IF إذا كانت قيمة الشرط True يتم تنفيذ الاوامر التى تلى كلمة Then وإذا كانت قيمة الشرط False يتم تنفيذ الاوامر التى تلى كلمة Else .,
بالرجوع للسؤال نجد أن قيمة الشرط true وبالتالى يتم تنفيذ الاوامر التى تلى كلمة Then .