vb 国际象棋放米问题

来源：百度知道编辑：UC知道时间：2024/05/29 00:38:45

国际象棋的棋盘有64个格子，假如在第1格放1粒米，第2格放2粒米，第3格放4粒米，第4格放8粒米，……，依次类推，每格的米粒数是上一格的两倍。计算总共需要多少粒米。
需要一个详细的编程过程，谢谢

dim s as double
dim i as integer;

s=1
for i=1 to 64
s=s*2
next i
s=s-1
print s

共需要放2^64-1=18446744073709551615粒米。
变量自己声明。
s=0
m=1
for i=1 to 64
s=s+m
m=m*2
next i
print s

数列问题 Sn=a1(1-q的n次方)/(1-q)

a1为1 q为2 n为64