第十卷9. 下面程序段的功能是求5!，在程序中有***********FOUND*********
*标记的下面一行语句是错误的，请将错误的语句改正过来。
CLEAR
***********FOUND**********
p=0 改为：________
FOR i=1 TO 5
***********FOUND**********
p=p+p*i 改为：________
ENDFOR
? "5！=",p
RETURN
标准答案：
p=1
p=p*i;
10. *题目：接收键盘输入的任意5个整数(不超过3位数), 找出其中的最大数并显示。
程序中共有2个错误。
*注意：不可以增加或删除程序行，也不可以更改程序的结构。
INPUT "请输入第一个数:" TO X
STORE X TO MA
N=5
***********FOUND**********
DO WHILE N>=5 改为：________
INPUT "请输入下一个数:" TO X
IF MA<X
MA=X
ENDIF
N=N-1
ENDDO
***********FOUND**********
?"最大数="+SUBS(MA,3) 改为：________
标准答案：
DO WHILE N>=1 ; DO WHIL N>=1
?"最大数=",SUBS(MA,3);
解答过程：
2.?"最大数="+STR(MA,3)
11.*题目:计算并在屏幕上显示出"九九乘法表"，显示格式如下
1×1＝1
2×1＝2 2×2＝4
3×1＝3 3×2＝6 3×3＝9
……
9×1＝9 … 9×8＝72 9×9＝81
*程序中共有2个错误，请修改下面一条语句的错误，并调试运行。
*注意：不可以增加或删除程序行，也不可以更改程序的结构。
X=1
DO WHILE X<=9
Y=1
***********FOUND**********
DO WHILE Y<=9 改为：________
??STR(X,1)+"×"+STR(Y,1)+"="+STR(X*Y,2)+" "
Y=Y+1
ENDDO
***********FOUND**********
disp 改为：________
X=X+1
ENDDO
标准答案：
DO WHILE Y<=X
?;
解答过程：
1.DO WHILE X>=Y
12. LOOP; *题目：计算出1到50以内（包含50）能被2和3整除的数之和。
*注意：不可以增加或删除程序行，也不可以更改程序的结构。
STOR 0 TO X ,Y
***********FOUND**********
DO WHILE NOT EOF() 改为：________
X=X+1
DO CASE
CASE MOD(X,2)=0 AND MOD(X,3)=0
Y=Y+X
CASE X<=50
***********FOUND**********
X=X+1 改为：________
CASE X>50
EXIT
ENDCASE
ENDDO
?Y
标准答案：
DO WHILE .T.
13. *题目：计算1!+3!+9!的结果并输出。
*注意：不可以增加或删除程序行，也不可以更改程序的结构。
M=1
S=0
DO WHILE M<=9
STOR 1 TO I,P
P=1
***********FOUND**********
DO WHILE I>M 改为：________
P=P*I
I=I+1
ENDDO
S=S+P
***********FOUND**********
M=M+3 改为：________
ENDDO
? "1!+3!+9!=",S
标准答案：
DO WHILE I<=M; DO WHILE M>=I
M=M*3 ; M=3*M;。
