9 lines
83 B
Text
9 lines
83 B
Text
PROC Main()
|
|
CARD i=[1024]
|
|
|
|
WHILE i>0
|
|
DO
|
|
PrintCE(i)
|
|
i=i/2
|
|
OD
|
|
RETURN
|