9 lines
112 B
Text
9 lines
112 B
Text
|
Module Checkit {
|
||
|
|
Def long A=1024
|
||
|
|
While A>0 {
|
||
|
|
Print A
|
||
|
|
A/=2
|
||
|
|
}
|
||
|
|
}
|
||
|
|
Checkit
|