Вывести количество макисмальных элементов списка

@Iyna · Регистрация: 09.11.2020

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

Дан список элементов, нужно найти максимальный элемент и вывести его количестко.
Этот фрагент находит максимальное значение и выводит его, как сделать подсчет?

F#
1
2
3
4
let spisok = [1;2;3;4;5;6;6;6;6;6;7;6]
let foo = 
    Seq.filter (fun e -> e % 2 = 1 or e%2=0) >> Seq.max
printfn "%A" (foo spisok)

@Shamil1 · 17.10.2022, 20:28

Сообщение от Iyna

Seq.filter (fun e -> e % 2 = 1 or e%2=0)

Этот код выбирает числа, которые или четные или нечетны. То есть, по сути, не делает ничего вразумительного.

@Shamil1 · 17.10.2022, 20:41

F#
1
2
3
4
5
6
7
8
9
let solve list =
    let f (v, cnt) x =
        if x < v then (v, cnt)
        elif x > v then (x, 1)
        else (v, cnt + 1)
    List.fold f (List.head list, 1) (List.tail list)
    |> snd
    
printfn "%i" <| solve [1;2;3;4;5;6;6;6;6;6;7;6]

Новые блоги и статьи Все статьи Все блоги /
Гайд по современным СУБД (небесспорный) Codd 26.06.2025 Когда я только начинал свой путь в IT как рядовой программист, база данных казалась мне чем-то простым и понятным. Ну, серьезно — это же просто место, где лежат данные, верно? Напиши SELECT * FROM. . .	Использование C# с AWS S3: Примеры с AWS SDK для .NET stackOverflow 26.06.2025 Amazon S3 (Simple Storage Service) уже давно стал стандартом де-факто в мире облачного хранения данных. Особенно приятно, что для разработчиков . NET предусмотрен отличный SDK, который значительно. . .	Веб-автоматизация с Python и Selenium AI_Generated 25.06.2025 Selenium с Python — это комбинация, которая выдержала проверку временем. Несмотря на появление новых инструментов вроде Playwright или Puppeteer, связка Python-Selenium остаётся золотым стандартом. . .	CQRS и Event Sourcing на C# ArchitectMsa 25.06.2025 За последние несколько лет сложность корпоративных приложений выросла в геометрической прогрессии. Простые монолитные системы уступили место распределенным микросервисам, а нагрузка на корпоративные. . .	Хак домофона или как открыть дверь по номеру yariko 25.06.2025 Забыли дома ключ. Не проблема. Можно открыть дверь домофона, просто позвонив на свой номер квартиры. Идея состоит в следующем. Внутрь трубки абонента встраивается контроллер, который по звонку сам. . .
Как украсить новогоднюю елку с Q# и Qiskit EggHead 24.06.2025 Что может быть необычнее, чем применить законы квантовой механики для украшения новогодней елки? Пока другие развешивают обычные гирлянды, я решил объединить свою страсть к квантовым вычислениям с. . .	Системы нулевого доверия на C# UnmanagedCoder 24.06.2025 Традиционная архитектура безопасности работает по принципу средневекового замка: создаём высокие стены вокруг корпоративной сети, укрепляем ворота межсетевыми экранами и системами обнаружения. . .	Снова не мой путь. Циклическое среднее, я обеими руками за проверку условия, в ракурсе данной задачи - циклическое среднее в топку. Hrethgir 24.06.2025 Привет. Такой вопрос - нужно выводить среднее математическое между двумя направлениями, интервал значений которых может лежать в диапазоне одного оборота по кругу. Проблема заключается в том, что. . .	Деплой Flask приложения py-thonny 23.06.2025 За годы работы с Flask я натыкался на одни и те же грабли достаточно часто, чтобы наконец научится их обходить. И сегодня хочу поделится опытом, который сбережет вам немало нервных клеток. Начнем с. . .	WebAssembly и контейнеры в .NET Aspire для оркестрации распределенных архитектур ArchitectMsa 23.06.2025 Я наблюдаю, как WebAssembly (или просто WASM) постепенно выходит за рамки своего первоначального предназначения — исполнения кода на стороне браузера. Теперь эта технология проникает в серверную. . .

Вывести количество макисмальных элементов списка

Решение