Data update

This commit is contained in:
Ingy döt Net 2026-04-30 12:34:36 -04:00
parent 4bb20c9b71
commit cbaf4c4b64
12390 changed files with 318560 additions and 27248 deletions

View file

@ -0,0 +1,20 @@
REBOL [
Title: "Loop/Continue"
URL: http://rosettacode.org/wiki/Loop/Continue
]
; REBOL2 does not provide a 'continue' word for loop constructs,
; however, you may not even miss it:
print "One liner (compare to ALGOL 68 solution):"
repeat i 10 [prin rejoin [i either 0 = mod i 5 [crlf][", "]]]
print [crlf "Port of ADA solution:"]
for i 1 10 1 [
prin i
either 0 = mod i 5 [
prin newline
][
prin ", "
]
]

View file

@ -0,0 +1,8 @@
repeat i 10 [
prin i
if zero? i % 5 [
prin newline
continue
]
prin ", "
]