Дан массив a (20) заполнить его случайными целыми числами из [-10; 20] вывести на экран найти минимальный элементы массива и сумму положительных чисел
145
340
Ответы на вопрос:
var
a: array [1..20] of integer;
i, min, s: integer;
begin
min: = 20;
s: = 0;
for i: = 1 to 20 do
begin
randomize;
a[i]: = random(30) - 10;
if a[i] < min then min: = a[i];
if a[i] > 0 then s: = s + a[i];
end;
writeln('минимальный элемент: ', min);
writeln('сумма положительных чисел: ', s);
end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Adelina17401.12.2022 21:42
-
werffhuj23.11.2020 12:01
-
stoyanovadsДарья10.03.2022 21:28
-
diana999604.06.2021 13:27
-
esrogalov07.12.2020 17:29
-
Элла0330.05.2020 16:29
-
Volosyaka16.07.2022 00:35
-
пушинка1010.10.2020 09:16
-
АнимешкаПельмешка13.03.2022 10:08
-
filimo200030.08.2022 11:48
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.