Pascal.дана последовательность чисел .вывести на экран суммы положительных и отрицательных чисел данной последовательности.
284
293
Ответы на вопрос:
//pascal abc.net 3.1 сборка 1219 const n=10; begin var ar: =readarrinteger(n); writeln('сумма положительных=',ar.where(x -> x> 0).sum); writeln('сумма сумма отрицательных=',ar.where(x -> x< 0).sum); end. пример ввода: 1 -2 3 4 -5 -6 7 8 9 10 пример вывода: сумма положительных=42 сумма сумма отрицательных=-13
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
agroDan13.07.2020 05:29
-
2Dtyantrap17.04.2022 12:02
-
mrkobra05.05.2022 15:09
-
ХозяинНосочков04.02.2022 18:39
-
HotaruAnastasija29.09.2022 04:31
-
papulova0319.02.2020 05:45
-
aidored14.02.2020 09:28
-
kisik40413.05.2020 11:36
-
Диас001023.04.2023 16:07
-
77darihi14.03.2020 20:05
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.