RosettaCodeData/Task/Loops-While/LDPL/loops-while.ldpl

11 lines
134 B
Text
Raw Permalink Normal View History

2023-09-01 09:35:06 -07:00
data:
n is number
procedure:
store 1024 in n
while n is greater than 0 do
display n lf
divide n by 2 in n
floor n
repeat