Какой результат исполнения алгоритма соответствует вводимым значениям переменных: а = 18,  b = 26, c = 10? В ответ запишите число.

Поскольку алгоритма нет, имею право ввести свой:) procedure swap(var a, b: real); var t: real; begin      t := a;      a := b;      b := t; end; var a, b, c: real; begin      readln(a, b, c);      if (a > b) then swap(a, b);      if (b > c) then swap(b, c);      if (a > b) then swap(a, b);      writeln(a, ' ', b, ' ', c); end. В ответе будет а = 10 b = 18 с = 26 =)