[.runstdin]{count 2 eq{2 copy add div mul 100 mul round dup 100 div exch cvi 10
mod 0 eq{=only 0}if =}if}forall