RosettaCodeData/Task/Loops-While/Oforth/loops-while.oforth
2016-12-05 23:44:36 +01:00

1 line
39 B
Text

1024 while ( dup ) [ dup println 2 / ]