您所在位置：主题：还有求1!+2!+......+10!的,请看看.谢谢.
新人
[专家分：30] 发布于 2005-05-29 23:01:00
(1)用FOR -NEXT
CLS
m=1
sum=0
FOR n=1 TO 10
m=m*n
sum=sum+m
next n
print sum
END
(2)用DO-LOOP UNTIL
CLS
m=1
n=1
sum=0
DO
m=m*n
n=n+1
sum=sum+m
LOOP UNTIL n>10
PRINT sum
END
CLS
m=1
sum=0
FOR n=1 TO 10
m=m*n
sum=sum+m
next n
print sum
END
(2)用DO-LOOP UNTIL
CLS
m=1
n=1
sum=0
DO
m=m*n
n=n+1
sum=sum+m
LOOP UNTIL n>10
PRINT sum
END
