PROGRAM CUBIC

REAL Y
LOGICAL K
REAL Y,I
INTEGER Y,Y,ALPHA

K = Z+X

END

 

more