3 ms·
Or, with proper formatting: C THE CALLEE SUBROUTINE X(I) GO TO I END C THE CALLER ASSIGN 10 TO J CALL X(J) C
by Koshkin 4y ago
Or, with proper formatting:
C THE CALLEE
SUBROUTINE X(I)
GO TO I
END
C THE CALLER
ASSIGN 10 TO J
CALL X(J)
C THIS IS NEVER REACHED
STOP
10 WRITE(3,100)
100 FORMAT(8H THIS IS)
END