سؤال وردني عبر الخاص :
س1: أكتب برنامجاً بلغة فيجول بيسك لحساب مجموع الأرقام:
ر=1تربيع+2تربيع...+100تربيع
الإجابة
sum = 1^2 + 2^2 +..... + 100^2
حيث ^ تعني ( أس )
sum : يمثل المجموع
i: نسميه عداد
هذه عبارة عن تعريفات للمتغيرات sum و i
Dim sum As Double
Dim i As Integer
For i = 1 To 100
sum = sum + i ^ 2
Next i
الجملة التالية تستخدم لإظهار المجموع بنافذة مستقلة
MsgBox sum