RosettaCodeData/Task/Input-loop/NetRexx/input-loop-2.netrexx

21 lines
403 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
/* NetRexx */
options replace format comments java crossref symbols nobinary
-- Read from default input stream (console) until end of data
lines = ''
lines[0] = 0
inScanner = Scanner(System.in)
loop l_ = 1 while inScanner.hasNext()
inLine = inScanner.nextLine()
lines[0] = l_
lines[l_] = inLine
end l_
inScanner.close()
loop l_ = 1 to lines[0]
say l_.right(4)':' lines[l_]
end l_
return