Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
dsanavskiy77
19.05.2022 13:47 •
Информатика
Напишите программу которая выводит все четные элементы массива из массива заданного n. числом
Показать ответ
Ответ:
milankagl
21.08.2020 09:38
// PascalABC.NET 3.3, сборка 1625 от 17.01.2018
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),-50,50); a.Println;
a.Where(t->t.IsEven).Println
end.
Пример
n= 13
6 -18 -6 37 47 -32 31 6 16 -41 32 28 -13
6 -18 -6 -32 6 16 32 28
0,0
(0 оценок)
Популярные вопросы: Информатика
kozaksolomia1
27.02.2023 07:10
Дано трёхзначное число, поменять местами сотни и единицы и сравнить эти числа? ?...
sashapro228
18.01.2021 12:56
Отметте ложные утверждение нужно...
СараАмилина
01.09.2021 20:55
Дайте информацию об интернет услугах на основе личного опыта....
SolDPriCe
04.01.2021 21:03
Ниже в табличной форме представлен фрагмент базы данных о результатах спартакиады школьников (юноши). Сколько записей в данном фрагменте удовлетворяют условию (Возраст 16) И (Бег...
максим1503889900
06.09.2021 07:19
Задача1: Рассчитать объём памяти в мегабайтах, необходимой для представления двухминутного фильма на экране монитора с разрешением 1024х768 пикселей и палитрой из 1024 цветов. Частота...
Рита460
03.11.2022 03:22
1. Почему сжатие с потерями используется в основном как кодирование изображений и звука? 2. Поясните суть методов «кодирования повторов» и кодирование по Лемпелю-Зиву. 3. В чем...
helpmepleace2
01.04.2023 12:02
Определить расстояние на плоскости между двумя точками с заданными координатами. Составьте блок-схему и напишите программу...
Викторина22
15.01.2023 10:18
Составьте синквейн Мое отношение к рассказу Бежин луг Первое слово у вас уже есть. 2-5 самостоятельно. 1. Рассказ 2......
Гулчехра1022
15.01.2023 10:18
20 упражнение сделать...
romaberduk03
03.02.2020 13:08
Вычислите log7 (5) если log8 (5)=a ,log8 (7)=d...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),-50,50); a.Println;
a.Where(t->t.IsEven).Println
end.
Пример
n= 13
6 -18 -6 37 47 -32 31 6 16 -41 32 28 -13
6 -18 -6 -32 6 16 32 28