Question

我国古代数学名著孙子算经中有这样一道题,一百匹马拉100筐，大马驮三筐，中马驮一筐，两匹小马驮一筐

我国古代数学名著孙子算经中有这样一道题,一百匹马拉100筐，大马驮三筐，中马驮一筐，两匹小马驮一筐，求大中小马各多少匹

Answer 1

是不是所托的砖块的数量有问题，如果100个砖块的话只能是小马100匹，你试一试托200块砖。
procedure TForm1.Button1Click(Sender: TObject);
var
bh,mh,sh:integer;
begin
for bh:=1 to 33 do
begin
for mh:=1 to 50 do
begin
for sh :=1 to 100 do
if ((bh+mh+sh)=100) and ((3*bh+2*mh+sh)=200) then
listbox1.Items.Add('大马为：'+inttostr(bh)+'中马为：'+inttostr(mh)+'小马为：'+inttostr(100-bh-mh));

end;
end;
end;