RosettaCodeData/Task/Loops-While/Wart/loops-while.wart

5 lines
49 B
Text
Raw Permalink Normal View History

2016-12-05 23:44:36 +01:00
i <- 1024
while (i > 0)
prn i
i <- (int i/2)