完善下面4道程序题
各位同胞,帮帮忙,我是个新手,下面是4道题目,麻烦各位告诉偶怎么写???谢谢!!!
1.下列程序的功能是计算数列1!,2!,3!,...n!的前10项之和
nResult=0
nMult=________
FOR n=1 TO 10
nMult=nMult*n
nResult=_______________
ENDFOR
?nResult
2.下列程序的功能是统计一个字符串中各个字符的个数(假设字符串仅由大写英文字母A、B、C、D组成);
cStr='AABBDDCABCDAADBCAACCDDDDBB'
STORE 0 TO nA,nB,nC,nD
DO WHILE LEN(cStr)>0
c=LEFT(cStr,1)
n&c=_______
cStr=_________
ENDDO
?nA,nB,nC,nD
3.下列自定义函数DeleteSpace()的功能是将一个字符串中的所有空格删除:
FUNCTION DeleteSpace
PARAMETERS cStr
cResult=SPACE(0)
FOR n=1 TO ______
IF SUBSTR(cStr,n,1)=SPACE(1)
_________
ENDIF
cResult=cResult+SUBSTR(cStr,n,1)
ENDFOR
RETURN_______
ENDFUNC
4.下面程序段用一句命令可表示为______________________________________
DO CASE
CASE x>=85
Y='优秀'
CASE x>=60
Y='合格'
OTHERWISE
Y='不合格'
ENDCASE
[此贴子已经被作者于2007-10-13 18:42:37编辑过]