RosettaCodeData/Task/Loops-While/Smalltalk/loops-while-3.st

5 lines
104 B
Smalltalk

number := 1024.
[ number <= 0 ] whileFalse:
[ Transcript print: number; nl.
number := number // 2 ]