39.有一組數(shù):1、2、4、7、…,其第1個(gè)數(shù)是1,第2個(gè)數(shù)比第1個(gè)數(shù)大1,第3個(gè)數(shù)比第2個(gè)數(shù)大2,第4個(gè)數(shù)比第3個(gè)數(shù)大3,以此類推.求其前20項(xiàng)的和.
以下VB程序?qū)崿F(xiàn)上述功能,請(qǐng)把程序中的①、②出填寫完整.
Dim i As Integer,p As Integer,s As Integer
i=1
p=1
s=0
Do While
①
s=s+p
i=i+1
②
Loop
Print s.