Minmax18. Дано целое число $$N$$ и набор из $$N$$ целых чисел. Найти количество элементов, содержащихся между первым и последним максимальным элементом. Если в наборе имеется единственный максимальный элемент, то вывести $$0$$.
Решение Дмитрий:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 |
использовать Файлы алг Minmax18 (рез цел amount) нач файл файл1 цел A,MAX,firstMax,lastMax,i lastMax:=0 файл1:=открыть на чтение ("Minmax18.txt") ввод файл1, A i:=1 вывод A, " " MAX:=A firstMax:=i нц пока не конец файла(файл1) ввод файл1, A i:=i+1 вывод A, " " если A>MAX то MAX:=A firstMax:=i все если A=MAX то lastMax:=i все кц закрыть(файл1) выбор при lastMax=firstMax : amount:=0 при lastMax<>firstMax : amount:=lastMax-firstMax-1 все вывод нс кон |
Файл Minmax18.txt:
|
1 |
0 0 0 0 0 0 0 0 0 0 |
Другие задачи из раздела Minmax можно посмотреть здесь.
Комментарии: