12 lines
143 B
Text
12 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
|