Code Festival C Div and Add by kimiyuki

for$i(0..99){$y=0;($i%$_<1&&$y<$a[$_])?$y=$a[$_]:0 for 1..99;push@a,$y+$i-9*int$i/10}push@a,19;print$a[$_],$/for<>

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page