READ (5, 10) A(I) 
10 	FORMAT (F3.2)


	DO 50 J = 1, 20
      	READ (5, 11) A(I) 
11 	FORMAT (F3.2    
50       CONTINUE


         DO 50 J = 1, 20
         READ (5, 11) A,B,C 
         FORMAT (3F3.2)
 50      CONTINUE


        READ (5, 13)  (A(I), I = 1,20)
12      FORMAT  (20F3.2)