28 lines
477 B
Nim
28 lines
477 B
Nim
import bitops
|
|
import strformat
|
|
|
|
var n = 1
|
|
write(stdout, "3^x :")
|
|
for i in 0..<30:
|
|
write(stdout, fmt"{popcount(n):2} ")
|
|
n *= 3
|
|
|
|
var od: array[30, int]
|
|
var ne, no = 0
|
|
n = 0
|
|
write(stdout, "\nevil :")
|
|
while ne + no < 60:
|
|
if (popcount(n) and 1) == 0:
|
|
if ne < 30:
|
|
write(stdout, fmt"{n:2} ")
|
|
inc ne
|
|
else:
|
|
if no < 30:
|
|
od[no] = n
|
|
inc no
|
|
inc n
|
|
|
|
write(stdout, "\nodious:")
|
|
for i in 0..<30:
|
|
write(stdout, fmt"{od[i]:2} ")
|
|
write(stdout, '\n')
|