count := 0;

for i := 1 to n do
 if x[i, 1] = x[i, m] then count := count + 1;

Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.