Вопрос по информатике:
Ребята, нужна ваша помощь!!!
1.Найдите количество положительных и отрицательных элементов в массиве а(10)
2.Найдите в массиве сумму минимального и максимального в массиве а(10)
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 05.06.2018 23:38
- Информатика
- remove_red_eye 17063
- thumb_up 30
Ответы и объяснения 1
1.
begin
var a:=ArrRandom(10,-20,20).Println;
writeln('количество положительных элементов = ',a.Where(x-x>0).Count);
writeln('количество отрицательных элементов = ',a.Where(x-x<0).Count);
end.
Пример:
7 6 -20 -12 -16 3 -4 -8 -4 1
количество положительных элементов = 4
количество отрицательных элементов = 6
2.
begin
var a:=ArrRandom(10,0,50).Println;
writeln('min+max = ',a.Min+a.Max);
end.
Пример:
18 5 45 43 50 37 32 17 31 24
min+max = 55
- 06.06.2018 22:51
- thumb_up 2
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.