COBOL程序设计—6概要1.pptVIP

PERFORM IterationCount VARYING Idx1 FROM 1 BY 3  UNTIL Idx1 EQUAL TO 7 AFTER Idx2 FROM 6 BY -1 UNTIL Idx2 LESS THAN 5 True False Idx1 Idx1 = 7 Move 1 to Idx1 Move 6 toIdx2 Next Statement Idx2 5 Loop Body Dec Idx2 Idx2 T Move 6 to Idx2 Inc Idx1 Idx1 4 Idx2 5 True False 1 1 4 6 5 6 1 2 3 PERFORM IterationCount VARYING Idx1 FROM 1 BY 3  UNTIL Idx1 EQUAL TO 7 AFTER Idx2 FROM 6 BY -1 UNTIL Idx2 LESS THAN 5 True False Idx1 Idx1 = 7 Move 1 to Idx1 Move 6 toIdx2 Next Statement Idx2 5 Loop Body Dec Idx2 Idx2 T Move 6 to Idx2 Inc Idx1 Idx1 4 Idx2 5 True False 1 1 4 4 6 5 6 5 1 2 3 4 PERFORM IterationCount VARYING Idx1 FROM 1 BY 3  UNTIL Idx1 EQUAL TO 7 AFTER Idx2 FROM 6 BY -1 UNTIL Idx2 LESS THAN 5 True False Idx1 Idx1 = 7 Move 1 to Idx1 Move 6 toIdx2 Next Statement Idx2 5 Loop Body Dec Idx2 Idx2 T Move 6 to Idx2 Inc Idx1 Idx1 4 Idx2 4 True False 1 1 4 4 6 5 6 5 1 2 3 4 PERFORM IterationCount VARYING Idx1 FROM 1 BY 3  UNTIL Idx1 EQUAL TO 7 AFTER Idx2 FROM 6 BY -1 UNTIL Idx2 LESS THAN 5 True False Idx1 Idx1 = 7 Move 1 to Idx1 Move 6 toIdx2 Next Statement Idx2 5 Loop Body Dec Idx2 Idx2 T Move 6 to Idx2 Inc Idx1 Idx1 4 Idx2 4 True False 1 1 4 4 6 5 6 5 1 2 3 4 PERFORM IterationCount VARYING Idx1 FROM 1 BY 3  UNTIL Idx1 EQUAL TO 7 AFTER Idx2 FROM 6 BY -1 UNTIL Idx2 LESS THAN 5 True False Idx1 Idx1 = 7 Move 1 to Idx1 Move 6 toIdx2 Next Statement Idx2 5 Loop Body Dec Idx2 Idx2 T Move 6 to Idx2 Inc Idx1 Idx1 7 Idx2 6 True False 1 1 4 4 6 5 6 5 1 2 3 4 PERFORM IterationCount VARYING Idx1 FROM 1 BY 3  UNTIL Idx1 EQUAL TO 7 AFTER Idx2 FROM 6 BY -1 UNTIL Idx2 LESS THAN 5 True False Idx1 Idx1 = 7 Move 1 to Idx1 Move 6 toIdx2 Next Statement Idx2 5 Loop Body Dec Idx2 Idx2 T Move 6 to Idx2 Inc Idx1 Idx1 7 Idx2 6 True False 1 1 4 4 6 5 6 5 1 2 3 4 PE