RosettaCodeData/Task/Integer-sequence/Mathematica/integer-sequence.math

3 lines
36 B
Plaintext

x = 1;
Monitor[While[True, x++], x]