а что если variable a 2 1024 pow dup a ! 0 do a @ 1 — a ! loop a @ .
что выведется?
ну я не знаю того языка потому использовал forth в качестве псевдокода