PROGRAM CUBIC

CHARACTER*59 Y,I

DO 9 K = 8,88
ALPHA = K
6 CONTINUE
I = X
Y = X+(Y*BETA)

END

 

more