PROGRAM CUBIC
REAL Y
LOGICAL K
REAL Y,I
INTEGER Y,Y,ALPHA
K = Z+X
END
more