Qbasic语言中，欲从1到10的十个数字中由计算机任取5个数字，该怎样编程？

randomize timer
cls
for i = 1 to 5
x=int(rnd(1)*11)
print x
next

QBASIC,怎么学这个阿，上实际80年代的编程阿.
最少也得学VB.NET吧。
我记得QBASIC的DOS下的吧。

CLS
DIM A(10)
RANDOMIZE TIMER
FOR I = 1 TO 5
PRINT INT(RND * 10) + 1,
NEXT I
END

CLS
RANDOMIZE TIMER
FOR I = 1 TO 5
PRINT INT(RND(1)*10)+1
NEXT I
END

CLS
RIM A(5)
RANDOMIZE TIMER
FOR I=1 TO 5
A(I)=(RND*10)+1
PRINT A(I)
NEXT
END

上边各位有一个重大的错误，这样产生的数就成了1~11了
应该是
CLS
RANDOMIZE TIMER
FOR I = 1 TO 5
PRINT INT(RND * 9) + 1
NEXT
END