дан одномерный массив, состоящий из N целых чисел. Найти сумму всех положительных элементов, и сумму всех отрицательных элементов. на компьютер нужно написать программку
Skripp
2
13.04.2021 09:24
2
Другие вопросы по теме Информатика
aygul081071
12.06.2019 09:10
zackiminecraftc1
06.04.2021 12:35
MAKCUMKA228
06.04.2021 12:37
dronyuk88
11.04.2019 00:28
yorik555
10.04.2019 23:23
Zasxca
16.06.2019 13:50
SKYScraRPharaon
16.06.2019 13:50
elitael
16.06.2019 12:13
Популярные вопросы
- Чему равен объём сахара, массой 100 г?...
3 - Судно идёт равномерно со скоростью 8 м/с. За какоевремя судно преодолеет...
1 - Знайдіть суму та різницю многочленів: 1) n - 3 i n + 5; 2) х - 3x +7...
3 - СКОРЕЕ НЕ ПРОПУСКАЙ Создание изделий из нетрадиционных и современных...
2 - Надо составить 10 утвердительных предложений в каждом из неопределенного...
2 - Английский язык задания от паже паже ВСТАВИТЬ СЛОВА offend impression...
3 - Берите ))) мож кому надо)))...
3 - 2b 2c 3a 3b сделайте эти заданиемне надо сдать обязательно умоляю вас...
2 - 1. На горизонтальному дні водойми, що має глибину 1,6 м, лежить плоске...
1 - 1.Выпишите из текста все сказуемые, подпишите грамматическое время (Past...
3
begin
var N:Integer;
read(N);
var arr := ReadArrInteger(N);
writeln();
arr.Where(x -> x > 0).Sum.PrintLn();
arr.Where(x -> x < 0).Sum.PrintLn();
end.
//PascalABC.NET v3.5.X