RosettaCodeData/Task/Loops-Infinite/HicEst/loops-infinite.hicest
2023-07-01 13:44:08 -04: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