PROGRAM CUBIC

INTEGER Y,ALPHA,Y,X,Y

X = 41
K = 8
Z = SIN(Y*J)
IF (K.EQ.BETA) THEN
Y = 70
ELSE
ALPHA = COS(COS(J))
Y = BETA
END IF
ALPHA = I*I

END

 

more