13 lines
143 B
Text
13 lines
143 B
Text
|
window 1, @"Count in Octal"
|
||
|
|
|
||
|
|
defstr word
|
||
|
|
dim as short i
|
||
|
|
text ,,,,, 50
|
||
|
|
|
||
|
|
print @"dec",@"oct"
|
||
|
|
for i = 0 to 25
|
||
|
|
print i,oct(i)
|
||
|
|
next
|
||
|
|
|
||
|
|
HandleEvents
|