Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
stepatimoshkov8Dimas
13.07.2020 04:56 •
Информатика
Дан массив к20. вычислить сумму отрицательных элементов
Ответ:
VaYfL
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 оценок)
Популярные вопросы: Информатика
ntazhibaevaa
26.12.2022 00:19
Напишите программу, которая подсчитает и выведет количество слов длины 10, которые можно составить из букв a, b, c....
sirushdarbinyap0aqdv
01.07.2020 22:07
Возможности графического интерфейса: 1. … 2. … 3. …...
Mikkail
01.03.2022 20:58
Бесполезная информация , мешающая восприятию полезной...
73487Юлия14271
14.03.2020 18:10
Чему будет равно у после выполнения алгоритма X:=1 y:=2*x y:=y+3 y:=y*x y:=y+4 y:=y*x y:=y+5...
remixzx60
08.01.2021 02:14
Склавиатуры вводится 3 числа, наибольшее увеличить на 3, меньшее на -3, среднее заменить на 0 паскаль...
Murew
08.01.2021 02:14
Составте блок схему begin var (a,b): =readreal2( введите стороны : ); var (c,d): =readreal2( введите основания : ); var h: =readreal( введите высоту : ); var s: =((c+d)/2)*h;...
The0ruyman
08.01.2021 02:14
Дачник вася решил вымостить свою садовую дорожку плиткой, плитки у васи двух типов 40 на 20 см и 60 на 20 см. дорожка прямая и узенькая- ровно в одну плитку шириной 20...
Анастасия22Кот11
08.01.2021 02:14
Написать программу по информатике z=sqrt|d^3-2|+3t данные : dn =-2 dk=1 hd=0.5 tn=-1 tk =-3 ht =-1...
Dazzel09
09.03.2020 14:59
Впарке живет 15 животных коровы кошки и кенгуру мы знаем что ровно 10 из них не коровы и 8 из них не кошки сколько кенгуру в парке...
angelinadvuradkina
28.05.2020 14:20
Какие средства музыкальной выразительности использует композитор, чтобы передать образ эгманта ...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
// Внимание! Если программа не работает, обновите версию!
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