langs a-z
This commit is contained in:
parent
db842d013d
commit
d066446780
11389 changed files with 98361 additions and 1020 deletions
12
Task/Loops-While/REBOL/loops-while.rebol
Normal file
12
Task/Loops-While/REBOL/loops-while.rebol
Normal file
|
|
@ -0,0 +1,12 @@
|
|||
REBOL [
|
||||
Title: "Loop/While"
|
||||
Author: oofoe
|
||||
Date: 2009-12-19
|
||||
URL: http://rosettacode.org/wiki/Loop/While
|
||||
]
|
||||
|
||||
value: 1024
|
||||
while [value > 0][
|
||||
print value
|
||||
value: to-integer value / 2
|
||||
]
|
||||
Loading…
Add table
Add a link
Reference in a new issue