langs a-z

2013-04-10 22:43:41 -07:00 · 2013-04-10 22:43:41 -07:00 · d066446780
commit d066446780
parent db842d013d
11389 changed files with 98361 additions and 1020 deletions
--- a/Task/Loops-N-plus-one-half/NetRexx/loops-n-plus-one-half.netrexx
+++ b/Task/Loops-N-plus-one-half/NetRexx/loops-n-plus-one-half.netrexx
@ -0,0 +1,16 @@
+/* NetRexx */
+options replace format comments java crossref savelog symbols nobinary
+
+  say
+  say 'Loops/N plus one half'
+
+  rs = ''
+  istart = 1
+  iend   = 10
+  loop i_ = istart to iend
+    rs = rs || i_.right(3)
+    if i_ < iend then do
+      rs = rs','
+      end
+    end i_
+  say rs