1024 :n (n 0 >) (n puts 2 div @n) while