Подсчитайте за один проход массива, сколько его элементов равны максимальному элементу. входные данные на вход программе сначала подается значение n100 — количество элементов в массиве. в следующей строке входных данных расположены сами элементы массива — целые числа, по модулю не превосходящие 30 000. выходные данные выдайте количество искомых элементов массива. примеры входные данные 8 4 3 5 2 5 1 3 5 выходные данные 3
vanyabond2611
1
27.08.2019 02:30
11
Другие вопросы по теме Информатика
мыпоммрт
17.01.2021 10:20
NastyaVelikaya2000
17.01.2021 10:24
Марьяна200413
25.09.2019 22:30
Retrostyle
25.09.2019 22:40
крымнаш
25.09.2019 22:40
stanvadrem
07.10.2020 21:35
Ainur0529
25.09.2019 21:01
sts23
25.09.2019 21:01
Polinaklass12
04.10.2021 01:20
Популярные вопросы
- КТО в английском языке умный?...
3 - Ребят, очень нужно(( Задание № 1: выпишите из текста и разберите...
2 - ФИЗИКА Сила тока в проводнике 2,25 А. Какой заряд пройдет через...
2 - Точке K(−3; 9) относительно точки (-3;0) симметрична точка с координатами:...
1 - Какие прудности пришлось преодоливать в послевоенное время?...
1 - При полном делении ядер, содержащихся в 1г урана, выделяется 2,3*10...
1 - АС – диаметр окружности с центром в точке О. На окружности отметили...
1 - Какое географическое положение тайги в северной америке?...
1 - Формулы двух природных дипептидов состоящих из различных аминокислотных...
1 - Установите соответствие между названием города и его местоположением....
2
A:array[1..100] of integer;
i,M,N,k:integer;
Begin
ReadLn(N);
M:=-30001;
k:=0;
For i:= 1 to N do
Begin
Read(A[i]);
if A[i]>M then
Begin
k:=0;
M:=A[i]
End;
if A[i]=M then k:=k+1
End;
WriteLn(k)
End.