Вывести номер её первой строки матрицы, содержащей максимальное количество одинаковых элементов

@Megawar · Регистрация: 14.11.2012

Author24 — интернет-сервис помощи студентам

Дана целочисленная матрица размера M x N .Вывести номер её первой строки ,содержащей максимальное количество одинаковых элементов

@Ce7eH_111 · 22.11.2012, 20:41

Сейчас сделаю

Добавлено через 11 минут

Pascal

var i,j,m,n,k,nom,h,max:integer;
      c: array [1..100,1..100] of integer;
Begin
read(m,n);
for i:=1 to m do begin readln; h:=0;
     for j:=1 to n do begin
              read(c[i,j]);
              for k:=j downto 1 do if c[i,j]=c[i,k] then inc(h);
     end;
   if h>max then nom:=i; end; readln;
 writeln('номер строки',nom);
 readkey
end.

@Megawar 0 / 0 / 0 Регистрация: 14.11.2012 Сообщений: 13
		1
	Вывести номер её первой строки матрицы, содержащей максимальное количество одинаковых элементов 22.11.2012, 19:16. Показов 2128. Ответов 1 Метки нет (Все метки) Дана целочисленная матрица размера M x N .Вывести номер её первой строки ,содержащей максимальное количество одинаковых элементов 0

	22.11.2012, 20:41

Опции темы

Вывести номер её первой строки матрицы, содержащей максимальное количество одинаковых элементов

Решение