请问怎么用DELPHI实现这道数学题？
一只鸭5元，一只鸡十元，一只鹅15元，小明带100元出去买鸡鸭鹅，请问他能买鸡鸭鹅共多少只，才能刚好把钱用完。把所有可能的结果写出来。

请问这道题用delphi怎么做循环阿~~~~~
我之前用C做出来的!!现在不知道DELPHI里怎么完成~~~~~~~求救~~！！！

[解决办法]
procedure TForm1.Button1Click(Sender: TObject);
const
N = 100;
var
A, B, C: Integer;
begin
for A := 0 to N div 5 do
for B := 0 to N div 10 do
for C := 0 to N div 15 do
if A * 5 + B * 10 + C * 15 = N then
Memo1.Lines.Add(Format( 'A = %d, B = %d, C = %d ', [A, B, C]));
end;