Ответы на вопрос:
// PascalABC.NET
begin
var n := ReadInteger('n =');
ReadSeqInteger(n).Count(p -> (p mod 3 = 0) and p.IsEven).Print
end.
Популярно: Информатика
-
Вариант 5.1. что такое регрессионная модель? 2. что подразумевается под восстановлением...
Mrx777709.10.2020 17:57 -
Напишите программу, которая в последовательности натуральных чисел определяет...
megamerezhnikova02.07.2022 07:41 -
В корзине лежат 8 чёрных шаров и 24 белых сколько бит информации несёт сообщение...
РЕЛАД11.10.2020 03:29 -
Өткізгіштің ұштарындағы кернеу 6в, кедергісі 3 ом. өткізгіштің ток күші қандай?...
assel0003125.09.2021 06:47 -
Какой цвет модели RGB будет получен при следующих параметрах 8-ми цвет-ной...
Ник111111н12.07.2022 22:26 -
1. Напишите программу в среде Кумир на алгоритмическом языке: Ввести три...
Сакура203405.02.2020 06:49 -
Сотнесите понятия гипперссылка ссылка оглавление....
0102928373646363704.06.2022 09:49 -
Нужна с информатикой 1. кузнечик стоит на координатной прямой в точке с координатой...
veronikamarina2006216.04.2022 02:58 -
1.Кортеж дегеніміз не? 2.Сөздіктер деген не? 3.Қандай қарапайым логикалық...
adamchik13.06.2023 14:04 -
Проверяет, состоит ли строка из цифр. s. (): Проверяет, состоит ли строка...
мадина303128.06.2021 13:27