WAP to Display .1 .03 .005 .0007 .00009 In QBASIC Program .
Cls
A = 10
For I = 1 To 10 Step 2
B = I / A
Print B;
A = A * 10
Next I
End
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
Comments
Post a Comment