Определить сумму наибольшего и второго по
значению наименьшего элементов. Паскаль. Не через массивы.
У меня во внешнем файле есть последовательность из отрицательных и положительных чисел!
1, 2,-3, 4, 5, -6, 7, 8, -9, 10!
Наибольшее число 10, наименьшее число -9, второе по значению наименьшее -6! Я нашел наименьшее и наибольшее, но не пойму как найти второе по значению наименьшее, помогите)

Var
    max, min, prev_min, n: integer;

begin
    max := -10000;
    min := 10000;
    prev_min := 10000;
    repeat
        read(n);
        if n > max then begin
            max := n;
        end;
        if n < min then begin
            prev_min := min;
            min := n;
        end;
    until n = 0;
   
    writeln(max, , prev_min);
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.