DO 10 I=2,10,2 J=I+4 DO 20 K=2,10,1 J=J+K 20 CONTINUE J=J+I 10 CONTINUE WRITE(6,100)J 100 FORMAT(1H ,I5) END