To generate the series- 2, 22, 222, 2222, 22222 (Qbasic Code)

To generate the series-  2, 22, 222, 2222, 22222

Using FOR .... NEXT

• CLS
  a = 2
  FOR i = 1 TO 5
      PRINT a;
      a = a * 10 + 2
  NEXT i
  END

Using WHILE ..... WEND

• CLS
  a = 2
  c = 1
  WHILE c <= 5
      PRINT a;
      a = a * 10 + 2
      c = c + 1
  WEND
  END

Share :

Twitter