DISPALY 1,2,3,5,8....13TH TERM(SUB)

DECLARE SUB SERIES()
CLS
CALL SERIES
END

SUB SERIES()
A=1
B=2
FOR I = 1 TO 10
PRINT A;
C= A+B
A=B
B=C
NEXT I
END SUB

Comments

Popular posts from this blog

Father's day

Journey to jm

My Father