write a program to print first 10 fibinocii numbers

'40) write a program to print first 10 fibinocii numbers

i=0
j=1
WScript.StdOut.Write i & " "
WScript.StdOut.Write j & " "

While (i<10)

i = i + j
WScript.StdOut.Write i & " "
j= i + j 
WScript.StdOut.Write j & " "
Wend