for$t(<>){$_=5e4;($t<$_?s/10/5/||y/25/12/:($t-=$_,print$t?"$_+":$_.$/))while$t}