有一个数组的问题请教？

有一问题请教：
有元素a1,a2,a3,a4,a5,a6,a7,a8,.......an,它们之间两两组合有以下几种情况：1.相同 2.相反 3.协同 4.无关 如a1和a1为相同, a1和a2为协同,a1和a3为相反 a1和a4为无关 
------------------------------------------------------------------
     a1 a2 a3 a4 a5 a6 a7 a8 .....
--------------------------------------------------------------------
 a1 相同 相反 协同 无关 相反 无关 协同 协同 a2 相反 相同 协同 协同 相反 协同 相反 无关 a3 协同 协同 相同 相同 ......
..........
------------------------------------------------------
  要在程序中实现从元素中任取其中几个如a1,a4,a8,a3,对取出元素进行两两配对检验，提示检验结果。
如a1和a4为无关，a1和a8为协同, a3和a4为相同.......请教用delphi如何实现。不需具体界面，只要语句即可。