RosettaCodeData/Task/Integer-sequence/DCL/integer-sequence.dcl
2015-11-18 06:14:39 +00:00

5 lines
64 B
Text

$ i = 1
$ loop:
$ write sys$output i
$ i = i + 1
$ goto loop