大学数据库VBA考试简单填空题。坐等答案。急求求 S = 1/1 + 1/2 + 1/3 + 1/4 + … + 1/n + … 的前n项之和,当S第一次大于或等于7时终止计算,此时项数n
2019-04-26
大学数据库VBA考试简单填空题。坐等答案。急求
求 S = 1/1 + 1/2 + 1/3 + 1/4 + … + 1/n + … 的前n项之和,当S第一次大于或等于7时终止计算,此时项数n
优质解答
sub test()
dim s as int
sim n as int
s=0
for n=1 to 6
s=s+1/n
next n
msgbox s
end sub
sub test()
dim s as int
sim n as int
s=0
for n=1 to 6
s=s+1/n
next n
msgbox s
end sub