REM ADDING ONE BY ONE FROM RIGHT- PYRAMID
CLS
LET Q$ = “PROGRAM”
LET W = LEN(Q$)
FOR I = 1 TO W
R$ = RIGHT$(Q$, I)
PRINT R$
NEXT
END

Please follow and like us: