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

5 lines
49 B
Plaintext

i <- 1024
while (i > 0)
prn i
i <- (int i/2)