8、設(shè)N值為4，字符”A”的ASCII碼為65。

　　程序代碼：

　　SET TALK OFF

　　CLEAR

　　INPUT "N=" TO N

　　FOR I=1 TO N

　　?SPACE(N-I+1)

　　FOR J=1 TO 2*I-1

　　??CHR(ASC("A")+J-1)

　　ENDFOR

　　ENDFOR

　　FOR P=N-1 TO 1 STEP -1

　　?SPACE(N-P+1)

　　FOR K=1 TO 2*P-1

　　??CHR(ASC("A")+K-1)

　　ENDFOR

　　ENDFOR

　　SET TALK ON

　　參考答案：

　　A

　　ABC

　　ABCDE

　　ABCDEFG

　　ABCDE

　　ABC

　　A

　　五、綜合編程題。根據(jù)題目要求，編寫相應(yīng)的程序。

　　1、求X+ X2 + X3 + X4 +¼+ Xn的值。N，X從鍵盤輸入。

　　程序代碼：

　　SET TALK OFF

　　clear

　　INPUT "X=" TO X

　　INPUT "N=" TO N

　　S=0

　　I=1

　　DO WHILE I<=N

　　S=S+X^I

　　I=I+1

　　ENDDO

　　?"X+X^2+X^3+...+X^N=",S

　　SET TALK ON

　　2、求S=2/1+3/2+5/3+8/5+13/8+…..前20項之和。

　　程序代碼：

　　SET TALK OFF

　　clear

　　S=0

　　N=1

　　X=1

　　Y=2

　　DO WHILE N<=20

　　S=S+Y/X

　　T=X

　　X=Y

　　Y=Y+T

　　N=N+1

　　ENDDO

　　?"2/1+3/2+5/3+...+17711/10946=",S &&共有N=20項累加

　　SET TALK ON