clear
s=0
for i=1 to 9 step 2
s=s+jc(i)
endfor
"1!+3!+5!+7!+9!="+alltrim(str(s))
function jc(x)
p=1
for j=1 to x
p=p*j
endfor
return p
endfunc
clear
s=0
for i=1 to 9 step 2
s=s+jc(i)
endfor
"1!+3!+5!+7!+9!="+alltrim(str(s))
function jc(x)
p=1
for j=1 to x
p=p*j
endfor
return p
endfunc