RosettaCodeData/Task/Integer-sequence/PureBasic/integer-sequence.purebasic

6 lines
54 B
Text
Raw Permalink Normal View History

2013-04-10 22:43:41 -07:00
OpenConsole()
Repeat
a.q+1
PrintN(Str(a))
ForEver