Дано N целых неотрицательных чисел. Нужно найти второй по величине элемент (то есть такой элемент, который станет наибольшим, если удалить один текущий максимальный элемент из множества).
Входные данные
В первой строке содержится единственное число N — количество чисел (1 ≤ N ≤ 100). Во второй строке заданы N целых чисел ai, разделенные пробелами (0 ≤ ai ≤ 1000).
Выходные данные
Вывести второй по величине элемент в данном множестве. Если в множестве только один элемент — нужно вывести -1.
koiiik1p0725i
2
15.03.2020 14:26
8
Другие вопросы по теме Информатика
Ender222
05.05.2020 07:38
snoopy201
14.05.2020 09:41
Алинур13
14.05.2020 09:41
dalepidorasp0833z
07.08.2019 17:20
vladchesak
25.01.2021 12:13
ddbbqq
25.01.2021 12:16
Популярные вопросы
- Рассмотрите изображение.(а) укажите какими цифрами обозначены вегетативные...
3 - Охарактеризовать всех героев (рассказ игорь- ронбинзон)...
2 - Лифт может перевозить 4 взрослых человека , если масса каждого не...
1 - 6. укажите верный вариант: the shoes are bed.a. from6. aboveb. underr....
2 - Написать отзыв к рассказу весенний ветер (в.мсухомлинский) ! заране...
3 - Какой пример из или науки можно капитал возрастает в результате...
1 - Составить пересказ из 10 предложений....
2 - Номер четвёртый. под буквой а. не забудьте указать обратную, заранее,...
2 - Напишите ответ и как решается это уровнение 18=2х/4...
3 - добрых людей перевести текст...
2
НА ПАСКАЛЕ
(rextestercom/EUBAMC2172)
program pas_znanija_34592817;
var
n, ai, i, max1, max2:integer;
begin
max1:=0;
max2:=0;
read(n);
for i:=1 to n do begin
read(ai);
if ai>=max1 then begin
max2:=max1;
max1:=ai;
end;
if (ai>max2) and (ai<max1) then max2:=ai;
end;
if n=1 then max2:=-1;
write(max2);
end.