Найти произведение элементов массива с(12) , имеющих значение в промежутке {5,3; 40,7}
116
294
Ответы на вопрос:
//pascalabc.net //версия 3.3, сборка 1611 begin var c: =arrrandomreal(12,-10,70).println(); write(c.where(x-> (x> 5.3) and (x< 40.(real(,y)-> x*y)); end.
//pascal var c: array [1..12] of real; i: byte; mult: real; begin randomize; mult : = 1; for i : = 1 to 12 do begin c[i] : = random * 75; if ((c[i] > 5.3) and (c[i] < 40.7)) then mult : = mult * c[i]; write(c[i]: 7: 2); end; writeln; writeln('произведение элементов от 5,3 до 40,7 = ', mult: 10: 2); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
mihailodnowal77730.04.2023 19:03
-
Varvarrrrrrrrrra01.03.2021 15:21
-
dfrt207.01.2022 02:57
-
bilayenot22.05.2020 16:10
-
Саша00722866622.12.2020 17:59
-
Mafiy1230.01.2020 23:46
-
VadimButs19.02.2020 06:42
-
mordvichev9214.10.2022 08:25
-
Глеб007112.06.2021 12:02
-
Iist18.01.2021 09:29
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.