xref: /freebsd/contrib/bc/tests/bc/scripts/print_056.bc (revision 24e4dcf4ba5e9dedcf89efd358ea3e1fe5867020)
1#! /usr/bin/bc -q
2
3b = 56
4
5s = b * b
6
7print "obase = ", b, "\n"
8print "\qobase = \q\n"
9b
10
11for (i = 0; i <= s; ++i) {
12	i
13	print "0.", i, "\n"
14	print ".", i, "\n"
15	print "1.", i, "\n"
16	print i, ".", "\n"
17	print i, ".", i, "\n"
18}
19
202189432174861923048671023498128347619023487610234689172304.192748960128745108927461089237469018723460
21
22halt
23