作业帮 > 综合 > 作业

把一元分成1分、2分、5分,有多少种方案?用Pascal语言编程.

来源:学生作业帮 编辑:神马作文网作业帮 分类:综合作业 时间:2024/09/23 14:30:29
把一元分成1分、2分、5分,有多少种方案?用Pascal语言编程.
为什么不试试用For循环语句呢
(要有方案数和各种方案)
把一元分成1分、2分、5分,有多少种方案?用Pascal语言编程.
你想要的FOR循环.对于一块钱根本不需要管什么效率,简单就好,他们想太多了.
var i,j,l,sum:integer;
begin
for i:=1to 10 do (1分的张数)
for j:=1to 5 do (2分的张数)
for l:=1to 2 do (5分的张数)
if i+2*j+5*l=10 then sum:=sum+1; (加起来刚好一元,方案加一)
writeln(sum);(输出)
end.