Последовательность состоит из натуральных чисел и завершается числом 0. определите значение второго по величине элемента в этой последовательности, то есть элемента, который будет наибольшим, если из последовательности удалить наибольший элемент. числа, следующие за числом 0, считывать не нужно. входные данные вводится последовательность целых чисел, оканчивающаяся числом 0 (само число 0 в последовательность не входит). выходные данные выведите ответ на . напишите прогу на паскале,

124

476

Посмотреть ответы 2

Ответы на вопрос:

JIuchno

Информатика

4,8(100 оценок)

Var a,max1,max2: integer; begin max1: =0; max2: =0; repeat read(a); if a> max1 then begin max2: =max1; max1: =a; end; until a=0; writeln(max2); end.

Danich114ejck

Информатика

4,5(2 оценок)

Попробуй обновить драйвера видеокарты.

150 000+ пользователей

Оформить подписку