Составь алгоритм решения задачи:расположить три числа 1 7 4 в порядке возрастания

var a, b, c: integer;

begin

a := 1;

b := 7;

c := 4;

if (a<=b) and (a<=c) and (b<=c) then writeln(a, b, c);

if (a<=b) and (a<=c) and (c<=b) then writeln(a, c, b);

if (b<=a) and (b<=c) and (a<=c) then writeln(b, a, c);

if (b<=a) and (b<=c) and (c<=a) then writeln(b, c,a);

if (c<=a) and (c<=b) and (a<=b) then writeln(c, a, b);

if (c<=a) and (c<=b) and (b<=a) then writeln(c, b, a);

end.