完善下面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编辑过]