 
Вопрос задан 20.02.2021 в 08:34.
Предмет Информатика.
Спрашивает Чинилова Екатерина.
Дан массив из десяти целых чисел. Определите, сколько элементов этого массива имеют максимальное
значение 0
        0
         0
        0
    Ответы на вопрос
 
        Отвечает Касаткин Владимир.
                
    var
 m: array [1..10] of integer;
 max, k, i: integer;
 begin
 for i := 1 to 10 do
 read(m[i]);
 max := m[1];
 k := 1;
 for i := 2 to 10 do
 if m[i] > max then
 begin
 k := 1;
 max := m[i]
 end
 else
 if m[i] = max then
 inc(k);
 write(k)
 end.
 0
                    0
                     0
                    0
                 
            Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.
                
    Чтобы определить, сколько элементов массива имеют максимальное значение, вам необходимо выполнить следующие шаги:
- Найти максимальное значение в массиве.
- Пройти по всем элементам массива и подсчитать количество элементов, которые равны максимальному значению.
Вот пример кода на Python, который выполняет эти шаги:
pythonarray = [2, 5, 9, 5, 3, 9, 8, 9, 5, 1]
# Находим максимальное значение в массиве
max_value = max(array)
# Инициализируем счетчик количества элементов с максимальным значением
count = 0
# Проходим по всем элементам массива и увеличиваем счетчик, если значение равно максимальному
for element in array:
    if element == max_value:
        count += 1
print("Количество элементов с максимальным значением:", count)
Результат выполнения кода будет:
Количество элементов с максимальным значением: 3
В данном примере массив содержит десять целых чисел, и три из них имеют максимальное значение, равное 9.
 0
                    0
                     0
                    0
                Топ вопросов за вчера в категории Информатика
Последние заданные вопросы в категории Информатика
Предметы
	- 
			Математика 
- 
			Литература 
- 
			Алгебра 
- 
			Русский язык 
- 
			Геометрия 
- 
			Английский язык 
- 
			Химия 
- 
			Физика 
- 
			Биология 
- 
			Другие предметы 
- 
			История 
- 
			Обществознание 
- 
			Окружающий мир 
- 
			География 
- 
			Українська мова 
- 
			Информатика 
- 
			Українська література 
- 
			Қазақ тiлi 
- 
			Экономика 
- 
			Музыка 
- 
			Право 
- 
			Беларуская мова 
- 
			Французский язык 
- 
			Немецкий язык 
- 
			МХК 
- 
			ОБЖ 
- 
			Психология 
- 
			Физкультура и спорт 
- 
			Астрономия 
- 
			Кыргыз тили 
- 
			Оʻzbek tili 
 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			