do
		a = int( rnd * 20)
		wscript.stdout.write a
		if a = 10 then exit do
		b = int( rnd * 20 )
		wscript.echo vbnullstring,b
	loop

	dim i
	for i = 1 to 100000
		a = int( rnd * 20)
		wscript.stdout.write a
		if a = 10 then exit for
		b = int( rnd * 20 )
		wscript.echo vbnullstring,b
	next