algol-things/src/slices.a68
2025-04-06 21:30:48 +01:00

21 lines
534 B
Plaintext

BEGIN
[, ] INT r =
((1, 2, 3, 4),
(5, 6, 7, 8),
(9, 10, 11, 12),
(13, 14, 15, 16));
put(stand out, (r[2, 2], newline));
put(stand out, (r[3, ], " ", newline)); # Space between elements #
put(stand out, (r[, 2 UPB r], " ", newline));
put(stand out, (r[3, 2], newline));
put(stand out, (r[2, ], " ", newline));
put(stand out, (r[, 3], " ", newline));
[] CHAR word = 3 * "ab";
print((word,newline));
[1 : 5] INT first_primes := (1, 3, 5, 7, 11);
print(first_primes[3])
END