1*3aa99676SStefan Eßerdefine prnt(i) { 2*3aa99676SStefan Eßer 3*3aa99676SStefan Eßer obase = i - 1 4*3aa99676SStefan Eßer a 5*3aa99676SStefan Eßer b 6*3aa99676SStefan Eßer c 7*3aa99676SStefan Eßer 8*3aa99676SStefan Eßer obase = i 9*3aa99676SStefan Eßer a 10*3aa99676SStefan Eßer b 11*3aa99676SStefan Eßer c 12*3aa99676SStefan Eßer 13*3aa99676SStefan Eßer return i 14*3aa99676SStefan Eßer} 15*3aa99676SStefan Eßer 16*3aa99676SStefan Eßerdefine prnt2(i) { 17*3aa99676SStefan Eßer 18*3aa99676SStefan Eßer obase = i + 1 19*3aa99676SStefan Eßer a 20*3aa99676SStefan Eßer b 21*3aa99676SStefan Eßer c 22*3aa99676SStefan Eßer 23*3aa99676SStefan Eßer print "\n" 24*3aa99676SStefan Eßer 25*3aa99676SStefan Eßer return i * 10 26*3aa99676SStefan Eßer} 27*3aa99676SStefan Eßer 28*3aa99676SStefan Eßera = 999999999999999999999999999999999999 29*3aa99676SStefan Eßerb = a + 1 30*3aa99676SStefan Eßerc = b + 1 31*3aa99676SStefan Eßer 32*3aa99676SStefan Eßeri = 100 33*3aa99676SStefan Eßeri = prnt(i) 34*3aa99676SStefan Eßer 35*3aa99676SStefan Eßerif (i + 1 <= maxobase()) { 36*3aa99676SStefan Eßer i = prnt2(i) 37*3aa99676SStefan Eßer} 38*3aa99676SStefan Eßerelse { 39*3aa99676SStefan Eßer print " 084 044 021 047 096 073 015 052 088 014 072 097 047 021 094 051 083\e\n 000\n" 40*3aa99676SStefan Eßer print " 084 044 021 047 096 073 015 052 088 014 072 097 047 021 094 051 083\e\n 001\n" 41*3aa99676SStefan Eßer print " 084 044 021 047 096 073 015 052 088 014 072 097 047 021 094 051 083\e\n 002\n" 42*3aa99676SStefan Eßer print "\n" 43*3aa99676SStefan Eßer i *= 10 44*3aa99676SStefan Eßer} 45*3aa99676SStefan Eßer 46*3aa99676SStefan Eßerif (i <= maxobase()) { 47*3aa99676SStefan Eßer i = prnt(i) 48*3aa99676SStefan Eßer} 49*3aa99676SStefan Eßerelse { 50*3aa99676SStefan Eßer print " 001 012 066 220 495 792 924 792 495 220 066 012 000\n" 51*3aa99676SStefan Eßer print " 001 012 066 220 495 792 924 792 495 220 066 012 001\n" 52*3aa99676SStefan Eßer print " 001 012 066 220 495 792 924 792 495 220 066 012 002\n" 53*3aa99676SStefan Eßer print " 999 999 999 999 999 999 999 999 999 999 999 999\n" 54*3aa99676SStefan Eßer print " 001 000 000 000 000 000 000 000 000 000 000 000 000\n" 55*3aa99676SStefan Eßer print " 001 000 000 000 000 000 000 000 000 000 000 000 001\n" 56*3aa99676SStefan Eßer} 57*3aa99676SStefan Eßer 58*3aa99676SStefan Eßerif (i + 1 <= maxobase()) { 59*3aa99676SStefan Eßer i = prnt2(i) 60*3aa99676SStefan Eßer} 61*3aa99676SStefan Eßerelse { 62*3aa99676SStefan Eßer print " 0989 0065 0781 0494 0209 0923 0209 0494 0781 0065 0989 0000\n" 63*3aa99676SStefan Eßer print " 0989 0065 0781 0494 0209 0923 0209 0494 0781 0065 0989 0001\n" 64*3aa99676SStefan Eßer print " 0989 0065 0781 0494 0209 0923 0209 0494 0781 0065 0989 0002\n" 65*3aa99676SStefan Eßer print "\n" 66*3aa99676SStefan Eßer i *= 10 67*3aa99676SStefan Eßer} 68*3aa99676SStefan Eßer 69*3aa99676SStefan Eßerif (i <= maxobase()) { 70*3aa99676SStefan Eßer i = prnt(i) 71*3aa99676SStefan Eßer} 72*3aa99676SStefan Eßerelse { 73*3aa99676SStefan Eßer print " 0001 0009 0036 0084 0126 0126 0084 0036 0009 0000\n" 74*3aa99676SStefan Eßer print " 0001 0009 0036 0084 0126 0126 0084 0036 0009 0001\n" 75*3aa99676SStefan Eßer print " 0001 0009 0036 0084 0126 0126 0084 0036 0009 0002\n" 76*3aa99676SStefan Eßer print " 9999 9999 9999 9999 9999 9999 9999 9999 9999\n" 77*3aa99676SStefan Eßer print " 0001 0000 0000 0000 0000 0000 0000 0000 0000 0000\n" 78*3aa99676SStefan Eßer print " 0001 0000 0000 0000 0000 0000 0000 0000 0000 0001\n" 79*3aa99676SStefan Eßer} 80*3aa99676SStefan Eßer 81*3aa99676SStefan Eßerif (i + 1 <= maxobase()) { 82*3aa99676SStefan Eßer i = prnt2(i) 83*3aa99676SStefan Eßer} 84*3aa99676SStefan Eßerelse { 85*3aa99676SStefan Eßer print " 09992 00035 09917 00125 09875 00083 09965 00008 09999\n" 86*3aa99676SStefan Eßer print " 09992 00035 09917 00125 09875 00083 09965 00008 10000\n" 87*3aa99676SStefan Eßer print " 09992 00035 09917 00125 09875 00083 09965 00009 00000\n" 88*3aa99676SStefan Eßer print "\n" 89*3aa99676SStefan Eßer i *= 10 90*3aa99676SStefan Eßer} 91*3aa99676SStefan Eßer 92*3aa99676SStefan Eßerif (i <= maxobase()) { 93*3aa99676SStefan Eßer i = prnt(i) 94*3aa99676SStefan Eßer} 95*3aa99676SStefan Eßerelse { 96*3aa99676SStefan Eßer print " 00010 00070 00210 00350 00350 00210 00070 00009\n" 97*3aa99676SStefan Eßer print " 00010 00070 00210 00350 00350 00210 00070 00010\n" 98*3aa99676SStefan Eßer print " 00010 00070 00210 00350 00350 00210 00070 00011\n" 99*3aa99676SStefan Eßer print " 00009 99999 99999 99999 99999 99999 99999 99999\n" 100*3aa99676SStefan Eßer print " 00010 00000 00000 00000 00000 00000 00000 00000\n" 101*3aa99676SStefan Eßer print " 00010 00000 00000 00000 00000 00000 00000 00001\n" 102*3aa99676SStefan Eßer} 103*3aa99676SStefan Eßer 104*3aa99676SStefan Eßerif (i + 1 <= maxobase()) { 105*3aa99676SStefan Eßer i = prnt2(i) 106*3aa99676SStefan Eßer} 107*3aa99676SStefan Eßerelse { 108*3aa99676SStefan Eßer print " 000009 099931 000209 099651 000349 099791 000069 099990\n" 109*3aa99676SStefan Eßer print " 000009 099931 000209 099651 000349 099791 000069 099991\n" 110*3aa99676SStefan Eßer print " 000009 099931 000209 099651 000349 099791 000069 099992\n" 111*3aa99676SStefan Eßer print "\n" 112*3aa99676SStefan Eßer i *= 10 113*3aa99676SStefan Eßer} 114*3aa99676SStefan Eßer 115*3aa99676SStefan Eßerif (i <= maxobase()) { 116*3aa99676SStefan Eßer i = prnt(i) 117*3aa99676SStefan Eßer} 118*3aa99676SStefan Eßerelse { 119*3aa99676SStefan Eßer print " 000001 000006 000015 000020 000015 000006 000000\n" 120*3aa99676SStefan Eßer print " 000001 000006 000015 000020 000015 000006 000001\n" 121*3aa99676SStefan Eßer print " 000001 000006 000015 000020 000015 000006 000002\n" 122*3aa99676SStefan Eßer print " 999999 999999 999999 999999 999999 999999\n" 123*3aa99676SStefan Eßer print " 000001 000000 000000 000000 000000 000000 000000\n" 124*3aa99676SStefan Eßer print " 000001 000000 000000 000000 000000 000000 000001\n" 125*3aa99676SStefan Eßer} 126*3aa99676SStefan Eßer 127*3aa99676SStefan Eßerif (i + 1 <= maxobase()) { 128*3aa99676SStefan Eßer i = prnt2(i) 129*3aa99676SStefan Eßer} 130*3aa99676SStefan Eßerelse { 131*3aa99676SStefan Eßer print " 0999995 0000014 0999981 0000014 0999995 0000000\n" 132*3aa99676SStefan Eßer print " 0999995 0000014 0999981 0000014 0999995 0000001\n" 133*3aa99676SStefan Eßer print " 0999995 0000014 0999981 0000014 0999995 0000002\n" 134*3aa99676SStefan Eßer print "\n" 135*3aa99676SStefan Eßer i *= 10 136*3aa99676SStefan Eßer} 137*3aa99676SStefan Eßer 138*3aa99676SStefan Eßerif (i <= maxobase()) { 139*3aa99676SStefan Eßer i = prnt(i) 140*3aa99676SStefan Eßer} 141*3aa99676SStefan Eßerelse { 142*3aa99676SStefan Eßer print " 0000010 0000050 0000100 0000100 0000050 0000009\n" 143*3aa99676SStefan Eßer print " 0000010 0000050 0000100 0000100 0000050 0000010\n" 144*3aa99676SStefan Eßer print " 0000010 0000050 0000100 0000100 0000050 0000011\n" 145*3aa99676SStefan Eßer print " 0000009 9999999 9999999 9999999 9999999 9999999\n" 146*3aa99676SStefan Eßer print " 0000010 0000000 0000000 0000000 0000000 0000000\n" 147*3aa99676SStefan Eßer print " 0000010 0000000 0000000 0000000 0000000 0000001\n" 148*3aa99676SStefan Eßer} 149*3aa99676SStefan Eßer 150*3aa99676SStefan Eßerif (i + 1 <= maxobase()) { 151*3aa99676SStefan Eßer i = prnt2(i) 152*3aa99676SStefan Eßer} 153*3aa99676SStefan Eßerelse { 154*3aa99676SStefan Eßer print " 00000009 09999951 00000099 09999901 00000049 09999990\n" 155*3aa99676SStefan Eßer print " 00000009 09999951 00000099 09999901 00000049 09999991\n" 156*3aa99676SStefan Eßer print " 00000009 09999951 00000099 09999901 00000049 09999992\n" 157*3aa99676SStefan Eßer print "\n" 158*3aa99676SStefan Eßer i *= 10 159*3aa99676SStefan Eßer} 160*3aa99676SStefan Eßer 161*3aa99676SStefan Eßerif (i <= maxobase()) { 162*3aa99676SStefan Eßer i = prnt(i) 163*3aa99676SStefan Eßer} 164*3aa99676SStefan Eßerelse { 165*3aa99676SStefan Eßer print " 00010000 00040000 00060000 00040000 00009999\n" 166*3aa99676SStefan Eßer print " 00010000 00040000 00060000 00040000 00010000\n" 167*3aa99676SStefan Eßer print " 00010000 00040000 00060000 00040000 00010001\n" 168*3aa99676SStefan Eßer print " 00009999 99999999 99999999 99999999 99999999\n" 169*3aa99676SStefan Eßer print " 00010000 00000000 00000000 00000000 00000000\n" 170*3aa99676SStefan Eßer print " 00010000 00000000 00000000 00000000 00000001\n" 171*3aa99676SStefan Eßer} 172*3aa99676SStefan Eßer 173*3aa99676SStefan Eßerif (i + 1 <= maxobase()) { 174*3aa99676SStefan Eßer i = prnt2(i) 175*3aa99676SStefan Eßer} 176*3aa99676SStefan Eßerelse { 177*3aa99676SStefan Eßer print " 000009999 099960001 000059999 099960001 000009999\n" 178*3aa99676SStefan Eßer print " 000009999 099960001 000059999 099960001 000010000\n" 179*3aa99676SStefan Eßer print " 000009999 099960001 000059999 099960001 000010001\n" 180*3aa99676SStefan Eßer print "\n" 181*3aa99676SStefan Eßer i *= 10 182*3aa99676SStefan Eßer} 183*3aa99676SStefan Eßer 184*3aa99676SStefan Eßerif (i <= maxobase()) { 185*3aa99676SStefan Eßer i = prnt(i) 186*3aa99676SStefan Eßer} 187*3aa99676SStefan Eßerelse { 188*3aa99676SStefan Eßer print " 000000001 000000004 000000006 000000004 000000000\n" 189*3aa99676SStefan Eßer print " 000000001 000000004 000000006 000000004 000000001\n" 190*3aa99676SStefan Eßer print " 000000001 000000004 000000006 000000004 000000002\n" 191*3aa99676SStefan Eßer print " 999999999 999999999 999999999 999999999\n" 192*3aa99676SStefan Eßer print " 000000001 000000000 000000000 000000000 000000000\n" 193*3aa99676SStefan Eßer print " 000000001 000000000 000000000 000000000 000000001\n" 194*3aa99676SStefan Eßer} 195