Question

Блок-схема Придумайте алгоритм, вводящий три целых числа, который находит второе по величине число, если оно существует.

Answer 1

Var a,b,c:Real;beginWriteln('a');Readln(a);Writeln('b');Readln(b);Writeln('c');Readln(c);if (a>b)and (a<c )or (a>c) and (a<b) then writeln(a);if  (a<b) and (B<C) or (a>b)and(b>c) then writeln(b);if (a<b)and (a>c )or (a<c) and (a>b)or (a<c) and (a<b) then  writeln(c);end.

Answer 2

Алгоритм нахождения второго по величине числа из трех целых чисел можно описать следующим образом:

1. Вводим три целых числа a, b и c. 2. Инициализируем переменную second_max значением, которое гарантированно меньше всех трех чисел. 3. Если a больше b и a меньше c или a меньше b и a больше c, то second_max присваиваем значение a. 4. Если b больше a и b меньше c или b меньше a и b больше c, то second_max присваиваем значение b. 5. Если c больше a и c меньше b или c меньше a и c больше b, то second_max присваиваем значение c. 6. Выводим значение second_max.

Блок-схема для данного алгоритма может выглядеть следующим образом: ``` +---+ | a | +---+ | | v +-----+ | a>b | +-----+ | | v +---------+ | a>c or | | c>a | +---------+ | | v +---------+ | a>b and | | b>c | +---------+ | | v +---------+ | a>c and | | c>b | +---------+ | | v +---------+ | b>a and | | a>c | +---------+ | | v +---------+ | b>c and | | c>a | +---------+ | | v +---------+ | c>b and | | b>a | +---------+ | | v +---------+ | c>a and | | a>b | +---------+ | | v +-----+ | b | +-----+ ```

Например, если введены числа a = 5, b = 10, c = 7, то алгоритм выведет значение second_max = 7, так как это второе по величине число из трех.