Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
daniabloger
26.04.2022 10:40 •
Информатика
Водномерном массиве определить сумму четных чисел с использованием div или mod
Ответ:
vlab2018
26.08.2020 17:21
// PascalABC.NET 3.3, сборка 1547 от 07.10.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),-99,99); a.Println;
Writeln(a.Where(x->x mod 2=0).Sum)
end.
Пример
n= 13
4 -35 -9 -18 -36 -79 -80 -25 34 -7 93 -19 -92
-188
0,0
(0 оценок)
Популярные вопросы: Информатика
сумка228hjfjkjihjjj
04.11.2020 02:04
Значения двух массивов a и b с индексами от 1 до 10 при следующего фрагмента программы: for i : = 1 to 10 do a[i] : = i; for i : = 1 to 10 do b[i] : = a[i]-5; сколько...
ttttt1509999
29.01.2022 14:44
Написать программу решения следующей : дан массив из 20 целых чисел. 1. найти среднее арифметическое элементов массива. 2. найти количество чисел в заданном массиве,...
привет985
18.12.2021 13:32
Решить с использованием процедур. указать выделенные , решаемые процедурами. вычислить сумму тех чисел из заданного отрезка [a, b] (a, b — натуральные), в запись которых...
dariababaeva1
28.03.2022 13:49
Сколько единиц в двоичной записи числа (2^4400-1)*(4^2200 +2)...
SaNur78
03.12.2021 03:05
Там написано перед тобой число в двоичной системе. отметь , какое это число в десятичной системе ДАМ 15...
yartemok
16.02.2021 18:41
Аналык такшанын жуйелик блоктагы зыкметти кандай?...
Ульяна2732
26.12.2021 12:28
По анологии проведите десятичное число 225 в восьмеричное ...
Lbailieva
07.12.2021 17:43
Системное ПОПрикладное ПОКоммерческое ПОCистемы программирования...
16653
03.09.2021 15:57
Что является элементной массой второго поколения? А) полупроводниковые элементы;В) электронные лампы;С) интегральные схемы;Д) сверхбольшие интегральные схемы.2. К ЭВМ...
zhirola2013
20.11.2022 05:01
Вычисли пропускную в битах в секунду. 1 байт/с = 210 бит/с 220 бит/с 230 бит/с 23 бит/с...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),-99,99); a.Println;
Writeln(a.Where(x->x mod 2=0).Sum)
end.
Пример
n= 13
4 -35 -9 -18 -36 -79 -80 -25 34 -7 93 -19 -92
-188