(P255~257) 10 FORK 30 20 X=A+B JOIN 2 GOTO 40 30 Y=A-B JOIN 2 40 FORK 60 50 Z=XY JOIN 2 GOTO 70 60 M=X/Y JOIN 2 70 N=M+Z