Напишите программу поиска номера первого из двух последовательных элементов в целочисленном массиве из 30 элементов, сумма которых максимальна (если таких пар несколько, то можно выбрать любую из них).
Ответы на вопрос:
паскаль авс:
program kislota; uses crt; const n=30; var e: array[1..n] of integer; sum,nom,i: integer; begin writeln('*** alphaues is ***'); writeln('*** ok ***'); writeln(); writeln('элементы массива: '); randomize; nom: =0; for i: =1 to n do begin e[i]: =random(100)-50; write (e[i]: 5); end; sum: =e[1]+e[2]; for i: =1 to n-1 do if (e[i]+1 + e[i+1])> sum then begin sum: =e[i]+1 + e[i+1]; nom: =i; end; writeln(); writeln('номер первого элемента пары с максимальной суммой: ',nom); end.
var
a: array [1..30] of integer;
i,k,s: integer;
begin
randomize;
for i: =1 to 30 do begin
a[i]: =random(9)+1;
write (a[i],' ');
end;
s: =a[1]+a[2];
k: =1;
for i: =2 to 29 do
if a[i]+a[i+1]> s then begin
k: =i;
s: =a[i]+a[i+1];
end;
writeln;
writeln ('number: ',k);
readln;
end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
макашария20.04.2022 05:56
-
borisovak46802.05.2023 20:04
-
0502abylai10.10.2022 21:42
-
DiGribosha05.02.2021 12:37
-
aaaaaa25106.05.2020 04:15
-
Сабусик1212.07.2020 18:43
-
денчик29811.06.2022 11:08
-
KUGOTVIN22.11.2021 16:29
-
ника4355609.05.2023 12:46
-
YuraJuliya17.02.2023 17:17
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.