RosettaCodeData/Task/Integer-sequence/Axe/integer-sequence.axe

8 lines
74 B
Plaintext

While getKey(0)
End
0→I
Repeat getKey(0)
Disp I▶Dec,i
I++
EndIf I=0