C SIGH, THOSE WERE THE DAYS DIMENSION A(4,500) N = 500 WRITE (4,400) 400 FORMAT (' START') X = 0.01 J = 2 DO 100 I = 1,N A(1,I) = X Y = SQRT(X) A(J,I) = Y Y = SIN(X) A(J+1,I) = Y Y = ALOG(X) A(J+2,I) = Y X = X + 0.01 100 CONTINUE WRITE (4,404) 404 FORMAT(' END') WRITE (4,440) C 1 2 3 4 5 C 123456789a123456789b123456789c123456789d123456789e12 440 FORMAT(' # X SQRT SIN N-LOG') DO 110 I = 1,17 WRITE (4,444) I, A(1,I), A(2,I), A(3,I), A(4,I) 444 FORMAT(I3,F7.3,3X,3(F13.9,2X)) 110 CONTINUE STOP END