pascal问题a,b,c,d,e,f,g互不相等怎么表示 [复制链接]

if (a,b,c,d,e,f,g互不相等）
then ……
在pasca中怎么表示
谢谢了

没人告诉我吗？

(a<>b)and(a<>c)and(a<>d)and(a<>e)and(a<>f)and(a<>g)and(b<>c)and(b<>d)and(b<>e)and(b<>f)and(b<>g)and(c<>d)and(c<>e)and(c<>f)and(c<>g)and(d<>e)and(d<>f)and(d<>g)and(e<>f)and(e<>g)and(f<>g)
就这样，最朴素的方法。

一个一个做比较

用集合类型试一试

P的集合奇慢无比。
建议用位运算。