Два одинаковых элемента. Задача в Паскале.

[railnur]

Дана задача:
10. Определить, есть ли в данном двумерном массиве два одинаковых элемента.
Никак не могу ее осилить
Заранее спасибо.

[Zer0]

Два вложенных цикла и немного логики, например:

est:=false;
for i:=1 to n-1 do
 for j:=i+1 to n do
  if a[i]=a[j] then est:=true;
if est then writeln('Есть') else writeln ('Нет');