Впоследовательности из 15 целых чисел определить произведение(p) max и min ,сумму (s) отрицательных чисел данной последовательности
283
458
Ответы на вопрос:
программа на паскале:
var a,min,max,p,s,i: integer;
begin
write('a = ');
readln(a);
min: =a; max: =a;
if a< 0 then s: =a else s: =0;
for i: =2 to 15 do
begin
write('a = ');
readln(a);
if a< min then min: =a;
if a> max then max: =a;
if a< 0 then s: =s+a;
end;
writeln('min = ',min,' max = ',max,' p = ',min*max);
writeln('s = ',s);
end.
пример (для 5 чисел):
a = 5
a = -4
a = 2
a = 7
a = -1
min = -4 max = 7 p = -28
s = -5
//pascalabc.net 3.4 procedure abcd(k: integer; var smax,smin,sum: integer; var prod: biginteger); begin if k> smax then smax: =k; if k< smin then smin: =k; if k< 0 then sum+=k; prod*=k end; begin var (smin,smax,sum): =(maxint,-maxint,0); var prod: biginteger: =1; readseqinteger('введите 15 чисел-> ',15) .foreach(p-> abcd(p,smax,smin,sum,prod)); writeln('min=',smin,', max=',smax,', сумма отрицательных=',sum); writeln('произведение=',prod) end.
5
Объяснение:
Так как `s=1` и пока `i` будет меньше или равно 4 то цикл будет выполняться. После вывод нашего `S` которое уже равно `5`
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
kovalenko17101907.02.2023 19:19
-
Дерижабль06.06.2020 08:46
-
Istominyura22.06.2023 21:50
-
дэнчик6018.04.2022 03:12
-
bigsoldier30.03.2021 23:17
-
сулейбанова09.05.2022 09:09
-
sladkaiakailinn14.02.2020 16:14
-
kirill4671208.10.2022 18:53
-
lolkek8728.07.2022 06:09
-
КатяСвиридова17.02.2022 05:48
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.