填空题
下列程序(由17行语句组成)的功能是找出101—10000之间所有符合下列条件的数:该数等于其各位数字的阶乘之和。但程序运行时提示程序的第4行有错,第4行语句应修改为 1(17) 2 .
for i=101 to 100000
p=0
c=allt(str(i))
for j=1 to i
p=p+jc(val(substr(c,j,1)))
endfor
if i=p
?i
endif
endfor
function jc
parameters x
s=1
for n=1 to x
s=s*n
endfor
return s