一、 程序填空
1． 輸入一串?dāng)?shù)字字符,當(dāng)其個數(shù)為10時,進(jìn)行各個數(shù)字求和運算,否則重新輸入.
CLEAR
SET TALK OFF
S=0
DO WHILE .T.
ACCEPT “輸入一串?dāng)?shù)字字符：” TO X
M= (1)
IF M=10
(2)
ENDIF
(3)
ENDDO
FOR N=1 TO 10
S=S+ (4)
ENDFOR
”該數(shù)字字符各個數(shù)字之和為：”,S
SET TALK ON
RETURN
2． 定義一個包含10個元素的A數(shù)組,該數(shù)組中已有9個數(shù)據(jù)且按從小到大順序存放,第10個元素為空,現(xiàn)輸入一個數(shù)放到數(shù)組中,且要求仍為由小到大順序.
CLEAR
SET TALK OFF
DIME A(10)
FOR K=1 TO 9
INPUT "輸入"+ "第"+STR(K,2)+ "個數(shù)據(jù)" TO A(K)
NEXT
INPUT “輸入要插入的數(shù)：” TO X
FOR N=1 TO 9
IF A(N)>X
(5)
ENDIF
ENDFOR
FOR M=10 TO N+1 (6)
(7)
NEXT
(8)
FOR K=1 TO 10
A(K)
ENDFOR
SET TALK ON
RETURN