RosettaCodeData/Task/Loops-Infinite/HicEst/loops-infinite.hicest
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

3 lines
101 B
Text

DO i = 1, 1E20 ! for i with 16 or more digits: i == i + 1 == loop infinite
WRITE() "SPAM"
ENDDO