Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
igorzarubin2006
16.02.2020 20:31 •
Информатика
Составить программу которая формирует массив из 12 случайных чисел от 0 до 40 и выводит на экран чётные элементы массива
Ответ:
sadovskaya02
07.10.2020 12:04
// PascalABC.NET 3.3, сборка 1590 от 03.12.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(12,0,40); a.Println;
a.Where(t->t.IsEven).Println
end.
Пример
19 22 12 20 39 31 23 9 32 7 2 10
22 12 20 32 2 10
0,0
(0 оценок)
Популярные вопросы: Информатика
Костя228337
14.10.2022 10:12
Изобразите в виде схемы структуру современной науки-инфоратики....
19nadoeloikat1niki
05.10.2021 22:43
Написать программу. которая бы вычисляла сопротивление цепи r1 в которой три сопротивления r2 r3 r4 соединены параллельно...
billymilligaan
28.10.2022 09:10
1. Изучить правила организации вложенных циклов на языке программирования и описания и обработки двумерных массивов. 2. Составить блок-схему и программу для решения задачи в соответствии...
Лана200611
19.03.2020 16:36
Sum=0 for i in range(3,10,2): sum=sum + i%3 print(sum)...
лёванчик228
28.07.2020 09:56
N = int(input()) if n%3 == 0 and n%2 == 0: if abs(n) = 10 and abs(n) = 99: print( 1 ) else: print( 0 )else: print( 0 )...
ДжузоСузуя13
21.07.2021 13:29
Языки программирования Lazarus и Pascal...
sc8054456p08m25
05.12.2022 00:46
Найди площадь и периметр прямоугольника со сторонами 65 см и 120 мм....
Батаева095
14.07.2020 03:29
Найти неизвестный член пропорции: а) х:8=4:2 ; б) 5:4=2,5:х...
Stepanovayu2405
29.05.2023 05:37
Климат горного и межгорного склона , рельеф , растительность...
Natashabuchok
28.09.2020 16:13
Чим різнилися погляди старих і молодих громад...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(12,0,40); a.Println;
a.Where(t->t.IsEven).Println
end.
Пример
19 22 12 20 39 31 23 9 32 7 2 10
22 12 20 32 2 10