88. Qbasic Program to display 54321, 5432, 543, 54, 5

88. Write a sub procedure to display 54321, 5432, 543, 54, 5

DECLARE SUB SERIES ( )

CLS

CALL SERIES

END

SUB SERIES

FOR I = 5 TO 1 STEP -1

FOR J = I TO 1 STEP -1

PRINT J;

NEXT J

PRINT

NEXT I

END SUB