作业帮 > 综合 > 作业

编程pascal有三种纪念邮票,第一种每套1张售价2园.第二种每套1张售价4园,第三种每套9张售价2园,100张邮票用了

来源:学生作业帮 编辑:搜搜考试网作业帮 分类:综合作业 时间:2024/07/28 11:10:01
编程pascal
有三种纪念邮票,第一种每套1张售价2园.第二种每套1张售价4园,第三种每套9张售价2园,100张邮票用了100元钱,问三种邮票个几套?
编程pascal有三种纪念邮票,第一种每套1张售价2园.第二种每套1张售价4园,第三种每套9张售价2园,100张邮票用了
var i,j:integer;
begin
for i:=0 to 50 do
for j:=0 to 25 do
if (100-i-j) mod 9=0 then
if i*2+j*4+(100-i-j) mod 9 * 2 =100 then writeln (i,' ',j,' ',100-i-j);
end.