Two Dice of A sides by murky-satyr

set n 0
set a 0
while {$a<10?"[incr n]$n"%22-11||[incr a]:0} {puts N=$n,A=$a}

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

download

return to the top page