高分！！VF程序设计题！在线等！！

高分！！VF程序设计题！在线等！！
31.数列xi各元素的值是：x1＝1，x2＝1＋2,x3＝1＋2＋3,.....xn＝1＋2＋3＋......＋n。对数列求和：S=x1+x2+x3....，直到S>3000止，
求此时数列中最大的元素值。(程序名由考生自定)。在下列程序中填上缺少的语句或另外编写程序，运行程序，将结果填入答题窗口。
SET TALK OFF
CLEAR
s=0
p=0
i=1
DO WHILE .t.
p=p+i
S=S+P
IF s>3000
______
ENDIF
i=i+1
enddo
? p
RETURN
33.已知S1=1,S2=1+2,S3=1+2+3,…,SN=1+2+…+N,下面的程序求S20到S80有多少数能被17或35整除。改正后运行程序，将程序执行结果填入答案框内。
SET TALK OFF
I=20
N=0
DO WHILE I