Войти
Регистрация
Спроси ai-bota
олечк3
17.01.2022 15:04
Составить программу на языке паскаль с random дано a[i]∈[-13,8] найти произведение нечетных отрицательных чисел n=5
Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
minzer
21.11.2020 04:41
Объясните, что обозначают следующие жесты:...
Leraleralera151515
21.11.2020 04:41
Пусть для представления целых чисел в компьютере используется 16-разрядная ячейка (2 байта). Определить каков диапазон хранимых чисел если используются как положительные...
lavira3
10.10.2020 15:20
ответьте на вопросы максимум ...
gulya104
08.08.2021 23:18
Расскажите о USB на накопителях...
Viksa1451
01.08.2021 10:22
1. Что такое компьютерная презентация? 2. С каким расширением по умолчанию сохраняется файл презентации в MS Power Point 2013?3. Какая информация выводится в строке состояния?4....
egor2006012
29.07.2021 11:50
Исполнитель чертёжник перемещается на координатной плоскости, оставляя след в виде линии. чертёжник может выполнять команду сместиться на (a, b) (где a, b — целые числа),...
мак189
30.04.2020 06:24
Дан массив a размера n. сформировать новый массив b того же размера по следующему правилу: элемент bk равен сумме элементов массива с номерами от k до n. python...
муля15
30.04.2020 06:24
Найдите не сложный доклад по информатике ,,загрузочные вирусы ! только не сложный пересказывать надо и не умоляю !...
Sekureti556
30.04.2020 06:24
Запиши следующее высказывание в виде логического выражения: «если я хорошо подготовлюсь по языку, и , то я получу пятерки или четверки». простые высказывания: a – хорошо...
Ученицав
03.12.2022 08:36
Это Хемминг: 001010011010111 010000010111000 000001101100111 111101010001110 001011000000001 Надо потом перевести в 16 систему....
Ответ:
mazaso
08.10.2020 13:07
PascalABC.NET 3.3.5, сборка 1660 от 20.04.2018
Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(5,-13,8).Println.Where(t->(t<0) and t.IsOdd).ToArray;
if a.Count>0 then a.Aggregate(1,(i,j)->i*j).Println
else Writeln(0)
end.
Пример
-2 -6 -6 -7 -13
91
0,0
(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота