中科新闻网just中文意思是什么:请教高手编程：数组中数字比较问题
来源：百度文库 编辑：中科新闻网 时间：2024/05/13 09:58:28
假如有6个一维数组，每个数组各有4个不同的数字元素，数字随机产生，
问：如何实现任意两个数组中的元素最多有一个数字相同？
例如（1，2，3，4）和（1，5，6，7）。
如果出现2个以上的数字相同，例如（1，2，3，4）和（1，2，5，6）
则重新产生随机数字。
如何编程，不胜感激。
问：如何实现任意两个数组中的元素最多有一个数字相同？
例如（1，2，3，4）和（1，5，6，7）。
如果出现2个以上的数字相同，例如（1，2，3，4）和（1，2，5，6）
则重新产生随机数字。
如何编程，不胜感激。
dim a(6),b(6),c(6),d(6),e(6),f(6)
for i=1 to 6
a(i)=int(rnd*10)+1:b(i)=int(rnd*10)+1
next i
p=0
for i=1 to 6
for j=1 to 6
if a(i)=b(i) then p=p+1
next j
next i
之后依次产生c、d、e、f数足，并一一比较，程序有些繁杂，如果再开一个数组，做替身数组，可以多次调用子程序，程序篇幅大大缩短。
你要先做出一个“6个一维数组，每个数组各有4个不同的数字元素，数字随机产生”的程序，再将其进行对比，再使用IF语句对重复情况进行处理才行。。