7 lines
65 B
Text
7 lines
65 B
Text
program loop
|
|
|
|
while (1==1)
|
|
write(*,101)"SPAM"
|
|
101 format(A)
|
|
|
|
end
|