1024 [0 >] [
   dup puts
   2 / >int
] while