Что здесь не так?? ? Пишет ошибка 26 (паскаль)

все массивы string, s1.ss1 и тд, integer
begin
if (a[s1]+a[s2]=((((a[s1]+a[s2])=('АД'))
or ((a[s1]+a[s2])=('АЖ'))
....
or ((a[s1]+a[s2])=('ЯК'))
or ((a[s1]+a[s2])=('ЯМ'))
or ((a[s1]+a[s2])=('ЯР')))and (a[ss1]+a[ss2]=(((a[ss1]+a[ss2])=('АД'))
or ((a[ss1]+a[ss2])=('АЖ'))
....
or ((a[ss1]+a[ss2])=('ЯД'))
or ((a[ss1]+a[ss2])=('ЯК'))
or ((a[ss1]+a[ss2])=('ЯМ'))
or ((a[ss1]+a[ss2])=('ЯР'))) and (b[s1,ss1]+b[s2,ss2]=(((b[s1,ss1]+b[s2,ss2])=('АД'))
or ((b[s1,ss1]+b[s2,ss2])=('АЖ'))
or ((b[s1,ss1]+b[s2,ss2])=('АЗ'))
or ((b[s1,ss1]+b[s2,ss2])=('АЙ'))
....
or ((b[s1,ss1]+b[s2,ss2])=('ЯР'))) then begin ...end; end.

Сорри, не туда вопрос: D

Сорри, не туда вопрос: D