Найти цифру, которая встречается в наибольшем количестве элементов числового массива

@Guzel · Регистрация: 01.07.2020

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

Найти цифру, которая встречается в наибольшем количестве элементов числового массива.

@canadamoscow · 15.07.2020, 00:34

Pascal

##
var a := ArrRandom(10,-1000,1000).Println.Select(t-> abs(t).toString.toCharArray.Distinct.JoinToString)
.JoinToString('').GroupBy(t->t).MaxBy(t -> t.Count); 
$'Цифру {a.first} содержит {a.Count} элемент(-а,-ов)'.Println;

@Guzel 0 / 0 / 0 Регистрация: 01.07.2020 Сообщений: 2
		1
	Найти цифру, которая встречается в наибольшем количестве элементов числового массива 02.07.2020, 00:02. Показов 313. Ответов 1 Метки нет (Все метки) Найти цифру, которая встречается в наибольшем количестве элементов числового массива. 0

	15.07.2020, 00:34

Опции темы