1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
#! /usr/bin/bc -q for (b = 2; b <= 16; ++b) { if (b == 10) continue obase = 10 print "ibase = A; ibase = ", b, "\n" obase = b for (i = 0; i <= 65536; ++i) { i print "0.", i, "\n" print "1.", i, "\n" print i, ".", i, "\n" } } halt