Вводятся 4 числа. Нужно вывести их в порядке возрастания. При любых входных данных алгоритм должен выполнять не более пяти операций сравнения. Решения с большим количеством сравнений не оцениваются. Оператор вывода во всём текс...

Вводятся 4 числа. Нужно вывести их в порядке возрастания. При любых входных данных алгоритм должен выполнять не более пяти операций сравнения. Решения с большим количеством сравнений не оцениваются. Оператор вывода во всём тексте алгоритма должен быть единственный.
Гость
Ответ(ы) на вопрос:
Гость
Var m : array[1..4] of Integer; i,j,t : Byte; Begin   Readln(m[1],m[2],m[3],m[4]);   For i:=1 to 3 do    For j:=i+1 to 4 do      If m[j]
Не нашли ответ?
Ответить на вопрос
Похожие вопросы