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