编VB程序从1、2、5元三种面值的人民币中取20张,共计60元1、有多少种取法?2、每种取法1、2、5元各几张
来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/07/17 11:42:59
编VB程序
从1、2、5元三种面值的人民币中取20张,共计60元
1、有多少种取法?
2、每种取法1、2、5元各几张
从1、2、5元三种面值的人民币中取20张,共计60元
1、有多少种取法?
2、每种取法1、2、5元各几张
设置三层循环.面值和为sum,取法个数为num,用字符串数组s,保存1,2,5的张数
num=0
for i=0 to 20
for j=0 to 20-i
for k=0 to 20-i-j
sum=i+j*2+k*5
if sum=60 then
num=num+1
s(num)=str(i)+"张1元"+str(j)+"张2元"+str(k)+"张5元" /i、j、k分别表示11、2、5元的张数,每种取法的张数保存成一个字符串
end if
next k,j,i
就这么简单.
再问: 请问需要哪些按钮
再答: 只要一个按钮就够了。 另外对了,我那个程序好像少了一句,呵呵不好意思。 把if sum=60 then 改成if sum=60 and i+j+k=20 then 另外为了要显示结果,可以把s数组,依次输出到文本框中 i=1 while s(i)"" text1.text=text1.text+s(i)+vbnewline wend
num=0
for i=0 to 20
for j=0 to 20-i
for k=0 to 20-i-j
sum=i+j*2+k*5
if sum=60 then
num=num+1
s(num)=str(i)+"张1元"+str(j)+"张2元"+str(k)+"张5元" /i、j、k分别表示11、2、5元的张数,每种取法的张数保存成一个字符串
end if
next k,j,i
就这么简单.
再问: 请问需要哪些按钮
再答: 只要一个按钮就够了。 另外对了,我那个程序好像少了一句,呵呵不好意思。 把if sum=60 then 改成if sum=60 and i+j+k=20 then 另外为了要显示结果,可以把s数组,依次输出到文本框中 i=1 while s(i)"" text1.text=text1.text+s(i)+vbnewline wend
编VB程序从1、2、5元三种面值的人民币中取20张,共计60元1、有多少种取法?2、每种取法1、2、5元各几张
有2张5元,4张2元,8张1元的人民币,取出12元,有几种取法?
有5元币1张,2元、1元的人民币若干张,要从中取出10元,共有多少种不同的取法?
有一张5元、四张2元和八张1元的人民币,从中取出9元钱,共有多少种不同的取法?
从1张5元,4张2元,8张1元人民币中取出8元买商品一共有几种不同的取法
有1元、2元、5元的人民币50张,面值共计122元,已知1元的人民币比5元的多2张,问三种人民币各有多少张?不能用方程式
有1元、2元、5元的人民币50张,面值共计122元,已知1元的人民币比5元的多2张,问三种人民币各有多少张?确定不能用方
有1元,2元和5元的人民币50张,面值共计116元.其中1元的人民币比2元的多2张,求三种人民币各有多少张?
2道数学题 帮个忙1 今有人民币五角的10张,壹元的3张,贰元、伍元、拾元的各一张.从中任意取8张,有多少中不同的取法.
有1元.2元.5元的人民币50张,面值共计116元.已知1元人民币比2元的多2张,问三种人民币各有多少张?
有一张1元的 一张2元的 一张5元的 一张10元的 每次取2张,有多少种不同的取法?
现有面值为2元、1元和5角的人民币共24张,币值共计29元,其中面值为2元的比1元的少6张,求三种人民币各多少张