用5元钱买100只钮扣，其中金属钮扣每只 5 角，有机玻璃钮扣每只1角，小揿扣 1分钱买 3个，编程求出各种钮扣各买了多少只?

输入说明：无

输出说明：一行，3个整数，分别代表 金属扣,有机扣,揿扣

var
  a,b,c,i:integer;
begin
  repeat
    for i:=0 to 100 do
    i:=i+1;
  until(a+b+c=100)and(a*0.5+b*0.1+(c div 3)*0.01=5)
  write(a,' ',b,' ',c);
end.
哪里错了?