Вопрос по информатике:
Составить программу массив
K(10)={1;0;3;5;2;-4;6;-2;0;7}
найти сумму положительных и сумму отрицательных чисел
Пожаловаться
- 24.09.2015 13:59
- Информатика
- remove_red_eye 3427
- thumb_up 31
Ответы и объяснения 1
Begin
var a:=Arr(1,0,3,5,2,-4,6,-2,0,7).Println;
writeln(a.Where(x->x>0).Sum);
writeln(a.Where(x->x<0).Sum);
end.
var a:=Arr(1,0,3,5,2,-4,6,-2,0,7).Println;
writeln(a.Where(x->x>0).Sum);
writeln(a.Where(x->x<0).Sum);
end.
Пожаловаться
- 25.09.2015 20:35
- thumb_up 46
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы