To display the pattern. 123456789 1234567 12345 123 1 (Qbasic Code)

To display the pattern.

123456789

1234567

12345

123

1

• CLS
  a# = 123456789
  c = 1
  WHILE c <= 5
      PRINT TAB(c); a#
      a# = a# \ 100
      c = c + 1
  WEND
  END