实验五循环结构和过程程序设计.docVIP

实验循环结构和过程程序设计 1. CLEAR USE D:\VFP素材\kscj STORE 0 TO n,s scan s=s+数学 n=n=1 endscan ? 所有学生的数学总分：, S ? 所有学生的数学平均分：,s/n USE CANCEL 2. clear ACCEPT 输入一个英文字符串： TO X N=0 for I=1 to LEN(X) IF SUBSTR(X,I,1)= b N=N+1 ENDIF ENDfor ?英文字符b个数：,N CANCEL 3. clear s=0 for i=1 to 1000 s=s+(-1)^(i-1)*(1/(2*i-1)) endfor ?s=,s cancel 4. clear s=0 input n= to n for i=1 to n t=0 for j=1 to i t=t+j endfor s=s+t endfor ?s=,s cancel 5. clear s=0 input n= to n for i=1 to n step 3 t=1 for j=1 to i t=t*j endfor s=s+t endfor ?s=,s Cancel 6. CLEAR FOR I=1 TO 5 ?SPACE(