Вопрос по информатике:
ПОМОГИТЕ ПОЖАЛУЙСТА!!!!СРОЧНО!!! Задан линейный массив состоящий из n целых чисел. Массив вводят с клавиатуры. Найти максимальный элемент массива и его индексный номер. Найдите количество массива равный 4. Найти сумму элементов массива.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 26.03.2017 22:14
- Информатика
- remove_red_eye 14198
- thumb_up 37
Ответы и объяснения 1
// Внимание! Если программа не работает, обновите её версию!
begin
var a:=ReadArrInteger('->',ReadInteger('n='));
Writeln('Максимальный элемент № ',a.IndexMax+1,' равен ',a.Max);
Writeln('Количество равных 4 элементов: ',a.Where(x->x=4).Count);
Writeln('Сумма элементов массива равна ',a.Sum)
end.
Пример
n= 7
-> -5 3 0 4 9 4 4
Максимальный элемент № 5 равен 9
Количество равных 4 элементов: 3
Сумма элементов массива равна 19
- 27.03.2017 13:08
- thumb_up 4
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.