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