一个蛮简单的for循环，请帮忙看下
 

X:=[0000,0001......1111] #X有64个4bit的二进制数字（有重复）
Y:=[0000,0001......1111] #Y有16个4bit的二进制数字

如何写一个循环
列出X[i]=Y[j]的数量，
举例比如(0000,0),(0001,2),(0011,4)....(1111,8) #以Y的16个4bit罗列输出

我写了
[CODE]count := 0;
for j from 1 to 16 do
for i from 1 to 64 do
if X[i] = Y[j] then count[j] := count[j]+1 else i := i+1 end if
end do
end do;
print(Y[j], count[j])[/CODE]
但是不对。
请问有大大帮忙看下吗
谢谢啦先。

回复: 一个蛮简单的for循环，请帮忙看下
 

前面加上一个包即可 > with(Statistics);

输出结果为： 0
Y[17], 0