Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
alexxxay
03.03.2022 05:50 •
Информатика
14 ! , первому лучший ответ составить алгоритм позволяющую создавать массив заполненный числами задаными датчиком случайных чисел на интервале (-37,66).вывести на экран нечетные елементы массива а. размер произвольный
Ответ:
petrovspb
07.10.2020 15:09
// PascalABC.NET 3.3
begin
var a:=ArrRandom(10,-37,66); a.Println;
writeln('Нечётные элементы:');
a.Where(x->x mod 2<>0).Println;
end.
Пример:
10 53 1 16 -28 29 22 59 66 -31
Нечётные элементы:
53 1 29 59 -31
0,0
(0 оценок)
Популярные вопросы: Информатика
Кирилл6901
27.10.2020 14:09
Вводятся два целых числа. Проверить делится ли первое на второе. Если делится, то должно появиться слово Делится , если не делится, то слово Не делится и тут же Остаток...
povshedna
09.04.2023 17:01
Информатика 5кл расшифровать картину все 8 точек 2.5 3.3 10.3 11.5 6.5 6.11.10 8 8.5 теперь соединяем точкки линии 1) 1.2.3.4.1.2)5.6.7.8...
porotnikova03
18.11.2022 23:33
Создайте список целых чисел от -10 до 10 используя список через присвоение конкретных значений....
iluasdjoo
12.02.2023 18:01
Зная , что каждая буква исходного текста заменяется третьей после нее буквойв алфавите языка , который считается записным по кругу , декодируйте следующие высказывания...
jesussoul
12.02.2023 18:01
Построить на промежутке [-2, 2] с шагом 0,4 таблицу значений функции...
ясмина115
12.02.2023 18:01
Найдите ошибку, рисунок должен быть симметричным uses graphabc,crt; var t: integer; procedure lin( x,y,a,h: integer); begin t: = a- x; if ( h 0) then begin line (...
ЯхочуВхогвартс
06.12.2020 19:27
Какой в давние времена была Земля ? сказка о чём говорят цветы....
wwwlavor
06.03.2023 18:32
Средние линии ∆ относятся как 3:2:4,а Р∆=45см. Найти:AB,BC,AC...
andrew2324
24.04.2023 08:30
Убитая старушка была не целью а - ответ . роман Преступление и наказание...
perrezz
08.05.2020 10:22
Де у дятла зеленого спадкова інформація...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
var a:=ArrRandom(10,-37,66); a.Println;
writeln('Нечётные элементы:');
a.Where(x->x mod 2<>0).Println;
end.
Пример:
10 53 1 16 -28 29 22 59 66 -31
Нечётные элементы:
53 1 29 59 -31