Initial data commit
This commit is contained in:
parent
72d218235f
commit
f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
18
Task/Binary-digits/NetRexx/binary-digits.netrexx
Normal file
18
Task/Binary-digits/NetRexx/binary-digits.netrexx
Normal file
|
|
@ -0,0 +1,18 @@
|
|||
/* NetRexx */
|
||||
options replace format comments java crossref symbols nobinary
|
||||
|
||||
runSample(arg)
|
||||
return
|
||||
|
||||
method getBinaryDigits(nr) public static
|
||||
bd = nr.d2x.x2b.strip('L', 0)
|
||||
if bd.length = 0 then bd = 0
|
||||
return bd
|
||||
|
||||
method runSample(arg) public static
|
||||
parse arg list
|
||||
if list = '' then list = '0 5 50 9000'
|
||||
loop n_ = 1 to list.words
|
||||
w_ = list.word(n_)
|
||||
say w_.right(20)':' getBinaryDigits(w_)
|
||||
end n_
|
||||
Loading…
Add table
Add a link
Reference in a new issue