Divisors of a natural number: Difference between revisions

awk 'func divisors(n){printf "divisors of ";print n;printf " = [";for(j=1;j<n;j++){if(n%j==0){printf j;printf ","}};printf n;printf "]\n";}BEGIN{for(i=1;i<=16;i++)divisors((2^(i) -1)) ); divisors(2^(31 -1))}'

<pre>divisors of 1 = [1]

divisors of 3 2 = [1,32]

divisors of 7 4 = [1,72,4]

divisors of 15 8 = [1,32,54,158]

divisors of 31 16 = [1,312,4,8,16]

divisors of 63 32 = [1,32,74,98,2116,6332]

divisors of 127 64 = [1,1272,4,8,16,32,64]

divisors of 255 128 = [1,32,54,158,1716,5132,8564,255128]

divisors of 511 256 = [1,72,4,8,16,32,64,73128,511256]

divisors of 1023 512 = [1,32,4,8,1116,3132,3364,93128,341256,1023512]

divisors of 2047 1024 = [1,232,4,8,16,32,64,128,256,89512,20471024]

divisors of 4095 2048 = [1,3,5,7,9,13,15,21,35,39,45,63,65,912,1054,1178,19516,27332,31564,455128,585256,819512,13651024,40952048]

divisors of 8191 4096 = [1,81912,4,8,16,32,64,128,256,512,1024,2048,4096]

divisors of 16383 8192 = [1,32,4,8,16,32,64,128,43256,127512,1291024,3812048,54614096,163838192]

divisors of 32767 16384 = [1,72,4,8,16,32,64,128,256,31512,1511024,2172048,10574096,46818192,3276716384]

divisors of 65535 32768 = [1,32,54,158,1716,5132,8564,255128,257256,771512,12851024,38552048,43694096,131078192,2184516384,6553532768]