Ответы на вопрос:
Еще прикреплен с паскалевским файлом var n: integer; begin writeln('vvedi chislo'); readln(n); if n mod 2=0 then writeln ('chetnoe') else writeln ('ne chetnoe'); readln; end.
// pascalabc.net 3.2, сборка 1417 от 28.03.2017 // внимание! если программа не работает, обновите версию! begin var a: =readarrreal('вводите: ',readinteger('n=')); writeln('s=',a.where(x-> x< 0).select(x-> x*x).sum) end. пример n= 5 вводите: 12 -5 0 -7.5 9 s=81.25
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
arina27031606.10.2021 03:56
-
мам6528.01.2021 20:24
-
Костя4563231.05.2020 11:39
-
8951809964713.04.2020 20:36
-
kik67804.04.2020 19:16
-
Getara90711.09.2022 18:51
-
race20120.05.2021 04:00
-
Anna1011qpqq26.03.2023 15:20
-
annaerkina31.12.2022 22:27
-
nikaa1008.05.2020 09:43
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.