研究紀要第5号 情報処理教育講座 FORTRAN文法の手引き - 017/044page
(1) IF(A−B)n1,n1,n2
n2 1F(C−D)n1,n1,n3
n3 S1
n1 S2
(2) IF(A.GT.B.AND.C.GT.D)S1
S2
………
………
(1) IF(A−B)n1,n1,n2
n1 IF(C−D)n3,n3,n2
n2 S1
GO TO n4
n3 S2
n4 S3
………
(2) IF(A.GT.B.OR.C.GT.D)
GO TO n1
S2
GO TO n2
n1 S1
n2 S3
………
(1) IF(N−1)n1,n2,n1
n1 IF(N−2)n3,n4,n3
n3 1F(N−3)n5,n6,n5
n2 S1
GO TO n7
n4 S2
GO TO n7
n6 S3
GO TO n7
n5 S4
n7 S5
(2) IF(N.EQ.1)GO TO n1
IF(N.EQ.2)GO TO n2
IF(N.EQ.3)GO TO n3
S4
GO TO n4
n1 S1
GO TO n4
n2 S2
GO TO n4
n3 S3
n4 S5(3) IF(N.LT.1.OR.N.GT.3)GO TO n1
GO TO(n2,n3,n4),N
n2 S1
GO TO n5
n3 S2
GO TO n5
n4 S3
GO TO n5
n1 S4
n5 S5