RosettaCodeData/Task/Integer-sequence/Prolog/integer-sequence-1.pro

5 lines
47 B
Prolog
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
loop(I) :-
writeln(I),
I1 is I+1,
loop(I1).