Вопрос по информатике:
1)дан массив состоящий из 15 элементов ;найти сумму тех чисел которые стоят на нечетных местах
Решите срочнааааа
Пожаловаться
- 07.09.2018 09:02
- Информатика
- remove_red_eye 11890
- thumb_up 18
Ответы и объяснения 1
// PascalABC.NET 3.3, сборка 1541 от 29.09.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(15,-50,50); a.Println;
Writeln('Сумма элементов на нечетных местах ',
a.Where((x,i)->i.IsEven).Sum)
end.
Пример
48 -43 -46 37 34 41 30 47 26 -47 9 -43 -37 -45 2
Сумма элементов на нечетных местах 66
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(15,-50,50); a.Println;
Writeln('Сумма элементов на нечетных местах ',
a.Where((x,i)->i.IsEven).Sum)
end.
Пример
48 -43 -46 37 34 41 30 47 26 -47 9 -43 -37 -45 2
Сумма элементов на нечетных местах 66
Пожаловаться
- 08.09.2018 00:21
- thumb_up 17
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы