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