func main() var ss: [][]char :: cui@input().split(" ") var n: int :: ss[0].toInt(&) var k: int :: ss[1].toInt(&) var s: []char :: cui@input() var numBonusByPack: int for i(0, n - 1) do numBonusByPack :+ s[i] $ int - '0' $ int end for var pack: int :: k / n var ans: int if(pack > 10) if(numBonusByPack >= n) do k :: 10 * n else do ans :: (pack - 10) * (n - numBonusByPack) do k :- (pack - 10) * n end if end if var bonus: int for i(0, k - 1) if(bonus > 0) do bonus :- 1 else do ans :+ 1 end if do bonus :+ s[i % n] $ int - '0' $ int end for do cui@print("\{ans}\n") end func