计算并输出 S = ∑ xi x yi ( i=1 … 10) 其中xi的值分别为 1,2,3,4,5,6,7,8,9,

计算并输出 S = ∑ xi x yi ( i=1 … 10) 其中xi的值分别为 1,2,3,4,5,6,7,8,9,10 ;yi的值分别
计算并输出 S = ∑ xi x yi ( i=1 … 10)
其中xi的值分别为 1,2,3,4,5,6,7,8,9,10 ;yi的值分别为 11,12,13,14,15,16,17,18,19,20.
jacksonwd 1年前 已收到1个回答 举报

磕睡人 幼苗

共回答了28个问题采纳率:82.1% 举报

Private Sub Command1_Click()
Dim x(10) As Integer,y(10) As Integer
s = 0
For i = 0 To 9
x(i) = i + 1
y(i) = i + 11
s = s + x(i) * y(i)
Next i
Print s
End Su

1年前

3
可能相似的问题
Copyright © 2024 YULUCN.COM - 雨露学习互助 - 16 q. 0.031 s. - webmaster@yulucn.com