RosettaCodeData/Task/Integer-sequence/Red/integer-sequence.red

8 lines
68 B
Plaintext

Red ["Integer sequence"]
i: 1
forever [
print i
i: i + 1
]