在0至50的范围内有多少个数,其每位数的乘积大于每位数的和。clear
0fori10to50
ai10bi
ti10ifabab
1e
dif
ext
retur
30.把18元钱分成一元、二元和五元的纸币且纸币数共为10张的分法有多少种?(注:在兑换中一元、二元、五元的纸币数可以为0)。clear
0forfive0to3fortwo0to9
o
e10fivetwoifo
e0a
dfive5two2o
e18
1e
dif
ext
ext
retur
31.编写程序,求共有几组I、j、k符合算式ijkkji1333,其中I、j、k是09之间的一位整数。clear
0fori0to9forj0to9fork0to9
ifi100j10kk100j10i1333
1
e
dif
ext
ext
ext
fretur
32.一个数如果刚好与小于它的所有因子之和相等,则称该数为一个“完数”,如:6123,则6就是一个完数。求出10000以内的完数的个数及它们的和。clear
0t0forx1to10000
s0fori1tox2
ifxi0ssi
e
dif
extifxs
1ttxe
dif
ext