Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
LunnayaLiliya
10.04.2022 01:04 •
Информатика
Дан массив к20. вычислить сумму отрицательных элементов
Показать ответ
Ответ:
шогвшвгвшр
04.10.2020 15:15
// PascalABC.NET 3.2, сборка 1353 от 27.11.2016
// Внимание! Если программа не работает, обновите версию!
begin
var k:=ArrRandom(20,-30,30); k.Println;
Writeln('Сумма отрицательных: ',k.Where(x->x<0).Sum)
end.
Пример
2 6 -21 8 27 -24 -5 29 -25 25 -19 28 6 20 7 2 14 2 4 16
Сумма отрицательных: -94
0,0
(0 оценок)
Популярные вопросы: Информатика
irinapak1985
12.02.2021 01:48
Мне нужна только блок схема ! за понимание составить программу табулирования функции у=(3х^2-4)/(х+1) на интервале [0.5; 2.5] с шагом 0.1...
ПУТИН222
12.02.2021 01:48
Складіть алгоритм блок схему знаходження периметра трикутника зі сторонами a,b,c. запишіть результат його виконання для чисел 5 ,6,7...
хрустально
09.01.2023 23:19
Заполните массив степенями числа 2( от 2(в первой степени) до 2(в n степени) паскаль abc net...
Глеб0417
09.01.2023 23:19
Дан фрагмент электронной таблицы а1-х а2- (а1-3)/(в1-1) в1-6 в2- (а1-3)/(с1-5) с1-10 с2- с1/(а1-3) какое целое число должно быть записано в ячейке а1, чтобы диаграмма,...
Коля12Коля
02.03.2023 16:20
Сообщение, содержащее буквы от A до Z, кодируется в числа с использованием следующего сопоставления: A - 1, B - 2, ..., Z - 26. Требуется по заданной последовательности...
DarthMalgus
12.02.2023 16:05
Существующие методы шифрования информации...
228dflbr
07.03.2020 01:38
Шифровка - от А до Я, каждая буква по номеру без пробелов (А1 Б2... Я33). Даны четыре шифровки:3135420210203013313202033510Только одна из них расшифровывается единственным...
oxle
07.09.2021 13:51
Что ты понимаешь под коррекцией изображения?* *Как ты считаешь, в чем заключается основная цель применения эффектов к изображению?* *Какой эффект, не входящий в список...
ArtemkaCrash
24.03.2023 09:46
Контрольная работа по теме: «Графы»Вариант-14...
Ооггод
16.02.2020 11:28
Дано трехзначное число.найти произведение его цифр.составить на языке паскаль (программу) желательно на тетрадьном листе....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
// Внимание! Если программа не работает, обновите версию!
begin
var k:=ArrRandom(20,-30,30); k.Println;
Writeln('Сумма отрицательных: ',k.Where(x->x<0).Sum)
end.
Пример
2 6 -21 8 27 -24 -5 29 -25 25 -19 28 6 20 7 2 14 2 4 16
Сумма отрицательных: -94