【例】 1 1 2 2 2 3 3 4 4 4 5 5 6 6 6 7 7----2---6---0---4---8---2---6---0---4---8---2---6---0---4---8---2 IF ( A = B ) MOVE 1 TO A ELSE MOVE 2 TO A END-IF. IF ( ( A = B ) AND ( ( B = 1 ) OR ( B = 2 ) ) ) PERFORM ARE END-IF. PERFORM UNTIL ( FLG-EOF = FLG-FALSE ) PERFORM ITEM-SET PERFORM REC-WRITE END-PERFORM. PERFORM VARYING I FROM 1 BY 1 UNTIL ( I > 10 ) COMPUTE J = A(I) + J END-PERFORM. EVALUATE A WHEN 1 PERFORM A-IS-1 WHEN 2 PERFORM A-IS-2 WHEN OTHER CONTINUE END-EVALUATE. EVALUATE TRUE WHEN ( ( A = 1 ) AND ( C = B ) ) PERFORM ACB WHEN ( ( A = 2 ) AND ( C = D ) ) PERFORM ACD WHEN OTHER CONTINUE END-EVALUATE.