QBASIC语言编程

来源：百度知道 编辑：UC知道 时间：2024/06/22 02:52:24
用票面1元，2元，5元的钱组成100元，显示所有的组合方式并统计这些方式的个数。希望能有好的算法。注意，是把程序源代码写出来哦

FOR i = 0 TO 100
FOR j = 0 TO 100 STEP 2
FOR k = 0 TO 100 STEP 5
IF i + j + k = 100 THEN PRINT i, j / 2, k / 5:x=x+1

NEXT k
NEXT j
NEXT i
print "all",x
如果你不需要由0组成的组合数！例如100个一元的和0个两元的0个五元的就把IF这一语句改成！IF i+j+k and i<>0 and j<>0 and k<>0 then PRINT i, j / 2, k / 5:x=x+1