Решить по turbo pascal. 1) найти сумму элементов массива целых чисел в количестве 20 меньше данного числа 2. 2) найти все элементы массива целых чисел в количестве 20 удовлетворяющие условиям остаток от деления на 5 равен 3. 3) найти индексы элементов массива вещественных чисел, отрезки которых принадлежат отрезу a b. 4) выдать на экран элементы массива целых чисел в количестве 20, которые больше среднего арифметического элемента массива. буду .
124
367
Ответы на вопрос:
1)немного не понял фразу "меньше данного числа 2". если найти сумму всех элементов, которые меньше двух в массиве размером 20 элементов, то это var s,i: longint; m: array[1..100] of integer; begin for i: =1 to 20 do read(m[i]); s: =0; for i: =1 to 20 do if m[i]< 2 then s: =s+m[i]; writeln(s); end. 2) var i: longint; m: array[1..100] of integer; begin for i: =1 to 20 do read(m[i]); for i: =1 to 20 do if (m[i] mod 5=3) then writeln(m[i]); end. 3) var a,b,i: longint; m: array[1..100] of real; begin read(a); read(b); for i: =1 to 20 do read(m[i]); for i: =1 to 20 do if (m[i]> =a) and (m[i]< =b) then writeln(i); end. 4)var o,s,i: longint; m: array[1..100] of integer; begin for i: =1 to 20 do begin read(m[i]); s: =s+m[i]; end; o: =s div 20; for i: =1 to 20 do if m[i]> o then writeln(m[i]); end. прошу прощения, если есть ошибки в синтаксисе. нет возможности проверить в компиляторе
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
ololeg102.02.2021 22:07
-
rustamahiyarov11.01.2021 10:29
-
marjna16716.11.2021 10:40
-
влада40915.12.2020 10:23
-
DmitriyGromov02.07.2021 21:23
-
helpmepleasehelp127.05.2023 19:06
-
Coldflame713.07.2021 02:12
-
невидимка78965714.01.2020 08:07
-
mirgin200207.10.2022 16:03
-
Cat666131310.11.2021 02:23
![Caktus Image](/tpl/img/cactus.png)
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.