关于100元换40个硬币的pascal程序

来源：学生作业帮编辑：拍题作业网作业帮分类：综合作业时间：2024/04/28 03:25:42

关于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的顺序输出
仅需把循环变量名称更改就好
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个呢?