Циклы с параметром. Задача 3
Задана последовательность из NN целых чисел. Необходимо найти порядковый номер числа с максимальным модулем. Если таких чисел несколько, вывести наибольший номер.
Формат входных данных
В первой строке входного файла записано число NN (1≤N≤1000)(1≤N≤1000). В следующий строке через пробел записаны NN целых чисел, по модулю не превосходящих 100000100000.
Формат выходных данных
В выходной файл вывести одно число — номер последнего из элементов с максимальным модулем.
Примеры:
Вход
5
1 -2 -8 0 8
Выход
5
nastia293
3
07.05.2020 17:47
80
Другие вопросы по теме Информатика
MDMOD1
19.04.2021 17:26
АННА3333333333333
19.04.2021 17:27
polibfbxbdbdbcb
19.04.2021 17:28
НЕЗНАЙКА123987
18.05.2020 16:07
милка308
10.05.2019 10:16
alexmarssampoylcqg
28.05.2019 04:10
97shadesofblue
14.05.2019 16:10
Популярные вопросы
- тест дам лучший ответ и подпишусь ...
2 - Речення у якому використано порядковий числівник .? числівник у формі Зн.в,ужиток...
3 - Герои неоромантизма в рассказе Макар Чудра А.М.Горького...
2 - GIVING OPINION . I think that it is• I should be saying that• I don t think that•...
1 - Выбери и запиши наибольшую из десятичных дроьей:8,7 9,13 9,2 8,3...
2 - .Напишите письменную работу (объем 100 - 120 слов), сравнивая стихотворения В.С....
1 - Діамант до твору пістрява стрічка...
2 - Из 6 яблок получают 250 мл сока сколько яблок надо понадобится,чтобы получить...
3 - Постройте область решений неравенства...
3 - Как стать толстой, если не получается?...
3
Вот вариант на Паскале
var a, nn, i, max, maxi : integer;
BEGIN
read(nn); max := 0; maxi := 0;
for i := 1 to nn do begin
read(a);
if abs(a) >= abs(max) then begin
max := a; maxi := i;
end;
end;
write(maxi);
END.