关于100元换40个硬币的pascal程序
来源:学生作业帮 编辑:搜狗做题网作业帮 分类:综合作业 时间:2024/08/08 23:32:39
关于100元换40个硬币的pascal程序
分别为10块 5块 2块 1块的硬币
program zlx433;
var
n1,n2,n5,n10:integer;
begin
writeln;
for n1:=1 to 37 do
begin
for n2:=1 to 37 do
begin
for n5:=1 to 37 do
begin
for n10:=1 to 37 do
begin
if (n1+n2+n5+n10=40) and (n1*1+n2*2+n5*5+n10*10=100) then begin
write(n10,' ',n5,' ',n2,' ',n1);
readln;
end;
end;
end;
end;
end;
end.
嗯 不懂的是
输出答案的顺序为何是从2开始 而不是1
分别为10块 5块 2块 1块的硬币
program zlx433;
var
n1,n2,n5,n10:integer;
begin
writeln;
for n1:=1 to 37 do
begin
for n2:=1 to 37 do
begin
for n5:=1 to 37 do
begin
for n10:=1 to 37 do
begin
if (n1+n2+n5+n10=40) and (n1*1+n2*2+n5*5+n10*10=100) then begin
write(n10,' ',n5,' ',n2,' ',n1);
readln;
end;
end;
end;
end;
end;
end.
嗯 不懂的是
输出答案的顺序为何是从2开始 而不是1
看下最后一列一直在递增就知道
是你的循环体顺序的问题
如果你要按照10 5 2 1的顺序输出
仅需把 循环变量名称更改就好
n1 n2 n5 n10 --> n10 n5 n2 n1
是你的循环体顺序的问题
如果你要按照10 5 2 1的顺序输出
仅需把 循环变量名称更改就好
n1 n2 n5 n10 --> n10 n5 n2 n1
关于‘pascal.’的一道题的程序解释
问一下程序,pascal的.
求平均数的pascal程序
小莉把自己积存的硬币按“2个1元、1个5角、5个1角”的顺序排成一排.第40个硬币的面值是多少?如果这排硬币一共有100
有一角,二角,五角三种硬币共100元.已知每种硬币的个数个相同求三种硬币共有多少个?
Pascal将手中N张面值100元的人民币换成10元、5元、2元和1元面值的钱.要求正好换M张小面值人民币,且每种面值至
pascal 背包问题一段程序的解释
pascal的一个阅读程序题
五角国徽硬币值多少钱我认识一个烧开水的老太婆,她有100个带国徽的五角硬币,换给我要100元人民币,我没有要,谁能告诉我
有壹角,五角,一元三种面值的硬币共40元,已知每种硬币的个数相等,求三种硬币各有多少个?
有壹角、五角、壹元三种面值的硬币共40元,已知每种硬币的个数相等,三种硬币各有多少个?
1个1元硬币的面积大约是多少平方厘米?100个呢?