求Qbasic随机程序

来源：百度知道编辑：UC知道时间：2024/06/23 23:24:38

每次每行随机打出6个数，且每次运行程序打出的数都不同。

input n
randomize timer
for i = 1 to n
for j =1 to 6
print int (rnd*101)
for s = 1 to 1000
l=l+1
next s
next j
print
next i
end

INPUT N (N是几行）
FOR I=1 TO N
FOR J=1 TO 6
X=INT(RND*1000)+1
PRINT X;
NEXT J
PRINT
NEXT I
END