Question

Написать программу для упорядочения чисел a,b,c по возрастанию.Таким образом ,что а соответствует наименьшему,  b среднему, c наибольшему.

Answer 1

var a, b, c, t: integer;
begin
     readln(a, b, c);
     if (a > b) then
     begin
          t := a;
          a := b;
          b := t;
     end;
     if (b > c) then
     begin
          t := b;
          b := c;
          c := t;
     end;
     if (a > b) then
     begin
          t := a;
          a := b;
          b := t;
     end;
     writeln(a, ' ', b, ' ', c);
end.

Answer 2

Pascal

Answer 3

спасибо)

Answer 4

там есть кнопка

Answer 5

а я вот так захотела)