9 lines
144 B
Text
9 lines
144 B
Text
Public Sub Main()
|
|
Dim siBin As Short[] = [5, 50, 9000]
|
|
Dim siCount As Short
|
|
|
|
For siCount = 0 To siBin.Max
|
|
Print Bin(siBin[siCount])
|
|
Next
|
|
|
|
End
|