Страница 1 из 1
Найти наиболее часто встречающуюся в массиве цифру
Добавлено: 11 май 2010, 21:54
igor31
Дан непустой массив из цифр. Вывести на экран цифру, наиболее часто встречающуюся в этом массиве. помогите как её решить ?
Re: delphi
Добавлено: 12 май 2010, 00:00
Meteo
igor31 писал(а):Дан непустой массив из цифр. Вывести на экран цифру, наиболее часто встречающуюся в этом массиве. помогите как её решить ?
расположи все элементы массива по возрастанию, таким образом та цифра, которая встречается чаще всего будет в одной области...потом запусти через цикл подсчет одинаковых элементов...
Re: delphi
Добавлено: 12 май 2010, 00:13
igor31
Meteo писал(а):расположи все элементы массива по возрастанию, таким образом та цифра, которая встречается чаще всего будет в одной области...потом запусти через цикл подсчет одинаковых элементов...
ну в делфи я равположить масив по возростанию ещё смогу а вот с циклом у меня возникли проблемки как его записать ? нужен код цикла
однако спасибо за посказку
Re: delphi
Добавлено: 13 май 2010, 09:40
Хыиуду
Код: Выделить всё
curr_value=A[1]; curr_count=1;
max_value=A[1]; max_count=1;
for i:=2 to N do
begin
if A[i]=curr_value then inc(curr_count)
else begin
if curr_count>max_count then begin max_count:=curr_count; max_value:=curr_value; end;
curr_count:=1;
curr_value:=A[i];
end;
end;