Problem:
おつり

問題

太郎君はよくJOI雑貨店で買い物をする． JOI雑貨店には硬貨は500円，100円，50円，10円，5円，1円が十分な数だけあり，いつも最も枚数が少なくなるようなおつりの支払い方をする．太郎君がJOI雑貨店で買い物をしてレジで1000円札を1枚出した時，もらうおつりに含まれる硬貨の枚数を求めるプログラムを作成せよ．

例えば入力例1の場合は下の図に示すように，4を出力しなければならない．

入力

入力は複数のデータセットからなる．各データセットは1行からなり，太郎君が支払う金額（1以上1000未満の整数）が1つだけ書かれている．入力データはゼロ１つの行で終了する．

データセットの数は 5 を超えない．

出力

データセットごとにおつりに含まれる硬貨の枚数を1行に出力せよ．

入出力例

入力例

380
1
0

出力例

4
15

上記問題文と自動審判に使われるデータは、情報オリンピック日本委員会が作成し公開している問題文と採点用テストデータです。

Solution in Ruby (judge verdict: Accepted)

x = []
y = []
x[0] = gets.chomp.to_i
i = 1
while x[i-1] != 0
  x[i] = gets.chomp.to_i
  i = i+1
end
i = i-1
x.delete_at(i)
i = i-1

for j in 0..i
 change = 1000-x[j] 
 y[j] = 0
   if change >= 500
      y[j] = y[j] + 1
      change = change-500
   end
   if change >= 100
      y[j] = y[j]+1
      change = change - 100
     while change >= 100
       y[j] = y[j] + 1
       change = change-100      
     end
     
   end
   if change >= 50
     y[j] = y[j]+1
     change = change-50
   end
   if change >= 10
      y[j] = y[j]+1
      change = change-10
     while change >= 10
       y[j] = y[j]+1
       change = change-10      
     end
   end
   if change >= 5
     y[j] = y[j]+1
     change = change-5
   end
   if change >= 1
      y[j] = y[j]+1
      change = change-1
     while change >= 1
       y[j] = y[j]+1
       change = change-1   
     end
   end
end
for k in 0..i
  puts y[k]
end