Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Танюня123125443
22.02.2023 06:26 •
Информатика
1.в массиве из 25 элементов найти произведение положительных элементов меньших 5. 2.в массиве из 50 элементов найти максимальный элемент.
Показать ответ
Ответ:
lianochkaya14
23.09.2020 10:00
//PascalABC.Net 3.1 сборка 1200
begin
var p := 1;
p := ArrRandom(25, -50, 50).Where(x -> (x > 0) and (x < 5)).Aggregate((p, x)-> p * x);
PrintLn(p);
PrintLn(ArrRandom(50, -50, 50).Max());
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Ешкинкотматрос
24.06.2021 07:38
Дайте краткую характеристику поколений эвм и свяжите их с индустриальной революцией?...
vityadmitriev2
24.01.2023 10:44
5 Кбайт - ... байт, - ... бит. ... Кбайт - ... байт, - 12288 бит...
AndrewGuyGuyson
03.12.2020 19:52
Выберите команду для запуска MS EXCEL...
ярик471
19.09.2020 14:26
Составьте блок-схему алгоритма вычисления значения функции у =6х3+4х2+х. X вычисляется по формуле x=a+b. Значения a и b известны...
freemvount
15.05.2021 15:36
Для кодирования одного пикселя используется 24 бита. Фотографию размером 2048´1536 пикселей сохранили в виде несжатого файла. Определите размер получившегося файла...
qwertynikas
04.01.2022 23:46
Назовите три основных аспекта компьютерного моделирования...
Nimixim
27.01.2021 17:36
Приведите примеры протоколов из жизни. Какой протокол надо изменить при изменении скорости передачи данных....
Egorpiernand
08.01.2022 19:24
30. Упростите выражение и найдите его значение A^2-25b^2/5ab:(1/5b-1/a) при a=-60 b2,5...
are0t
03.12.2020 21:58
Закінчіть рівняння реакції 1. Be(OH)2+HCl= 2. СuSO4+NaOH = 3. Ba(OH)2+H2CO3= 4. LiOH + SO3= 5. NaOH + CO2 =...
КаземираМалевична
10.10.2020 01:36
Восточное побережье Греции омывается Ионическим, а западное Эгейским. Эгейское море усеяно многими островами. В южной части Греции находится самый большой остров -...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
var p := 1;
p := ArrRandom(25, -50, 50).Where(x -> (x > 0) and (x < 5)).Aggregate((p, x)-> p * x);
PrintLn(p);
PrintLn(ArrRandom(50, -50, 50).Max());
end.