Вводятся 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]
Не нашли ответ?
Похожие вопросы