tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Составить программу
Составить программу на языке паскаль с random дано a[i]∈[-13,8] найти произведение нечетных отрицательных чисел n=5
kizzka
3 23.09.2019 19:20
0
Ответы
niminol
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
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Nikoletta2550
18.09.2019 05:30
Дан одномерный массив a[n]. известно что в нём имеется 0. найти сумму всех элементов включительно до 0. в паскале...
806amanova
18.09.2019 05:30
Какое число нужно написать вместо многоточия, чтобы цикл выполнился ровно 3 раза? i: =4; while i = do begin writeln( ! ); i: =i-1; end;...
teyachichinadze1
24.06.2019 16:20
Составить программу вычисления дня недели (по цифрам от 1 до 7) с оператора case of на языке паскаль...
docogov
24.06.2019 16:20
Информатика. тема и локальные переменные. : написать массив из 10 элементов. в паскале, через процедуру...
Sasha2000ret
24.06.2019 16:20
Информатика. тема и локальные переменные. : описать массив из 10 элементов....
turebekrasul
24.06.2019 16:20
1.как называются программы осуществляющие отображение веб - страниц? 2.откуда поисковый сервер берет информацию для формирования ответа на запрос пользователя? 3.какие принципы...
Отлицница23
03.09.2020 21:58
7. Разместите рисунки флешек согласно условию задания. УИвана было шесть пронумерованных флешек. На первой флешке было 1200 Кбайт информации. После тогокак со второй флешки...
Mamboklubnika
03.09.2020 21:58
Допишив чем измеряется объём информационных собщений 1 бит=илиСимвол10 байт =бит15 килобайт (Кб) =байт1 мегабайт (Мб) =Кб1 гигабайт (Гб) =Мб1 терабайт (Тб) =Гб1 петабайт...
anjaps
03.09.2020 21:57
ответь на вопросы:!! для чего нужно соблюдать правила безопасности в компьютерном классе??почему школьникам вашего возраста нельзя работать с компьютером больше 20 минут??почему...
Djeka11
03.09.2020 21:57
На какие две основные группы делится информация...
Популярные вопросы
Вычисли цепочкой : 15 1/3*9 - 12 1/8 *8 + 6 1/5*10+7 6/7*8...
2
Написать сценарий к сценки одного эпизода тома сойера...
1
По ! какой объём аммиака (н.у.) потребуется для получения 56 грамм сульфата...
2
5. к какому полюсу намагниченного гвоздя — северному или южному — притянулись...
2
Предложите получения оснований ( уравнения реакций). 8класс...
1
Вычислите количество вещества водорода и железа и объем водорода если...
1
По данным таблицы найдите среднегодовое значение температуры воздуха,...
3
Запиши выражение по таблице.сравни их значения....
2
Вкакой жизненой ситуации уместно будет употребить пословицы: 1. сам не...
3
Известно что предваряет пролог к поэме ,,руслан и людмила небольшое стихотворение...
1
Внимание! Если программа не работает, обновите версию!
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