QBASIC Complete Solutions Class 9 Numeric Series

WAP to Print the following Numeric Series...

1.   1  4  9  16  25 ...... 100

CLS
For I = 1 to 10

Print I^2;

Next I

END

2. 1  2  4  7  11 ..... 10th Term

CLS

a = 1

b = 1

FOR I = 1 to 10

Print a;

a = a + b

b = b + 1

Next I

END

3.  100  95  90  85  ...... 50

CLS
FOR I = 100 to 50 step -5

Print I;

Next I 

END

4.   3  33   333   3333 33333

CLS
a = 3

For I = 1 to 5

Print a;

a = (a * 10 ) + 3

Next I 

END

5.  1  1  2  3  5  8  ....... 10th term 

CLS
a = 1 

b = 1

FOR I = 1 to 5

Print a;

Print b;

a = a + b

b = a + b

Next I

END