var
  a, b, c, temp: Integer;
begin
  // Пусть значения уже введены для a, b, c
 
  if a > b then
  begin
    temp := a;
    a := b;
    b := temp;
  end;
 
  if b > c then
  begin
    temp := b;
    b := c;
    c := temp;
  end;
 
  // После перестановки b может снова стать больше a
  if a > b then
  begin
    temp := a;
    a := b;
    b := temp;
  end;
 
  // Теперь числа a, b, c расположены по возрастанию
  WriteLn('a=', a, ' b=', b, ' c=', c);
end.

dmFyCiAgYSwgYiwgYywgdGVtcDogSW50ZWdlcjsKYmVnaW4KICAvLyDQn9GD0YHRgtGMINC30L3QsNGH0LXQvdC40Y8g0YPQttC1INCy0LLQtdC00LXQvdGLINC00LvRjyBhLCBiLCBjCgogIGlmIGEgPiBiIHRoZW4KICBiZWdpbgogICAgdGVtcCA6PSBhOwogICAgYSA6PSBiOwogICAgYiA6PSB0ZW1wOwogIGVuZDsKCiAgaWYgYiA+IGMgdGhlbgogIGJlZ2luCiAgICB0ZW1wIDo9IGI7CiAgICBiIDo9IGM7CiAgICBjIDo9IHRlbXA7CiAgZW5kOwoKICAvLyDQn9C+0YHQu9C1INC/0LXRgNC10YHRgtCw0L3QvtCy0LrQuCBiINC80L7QttC10YIg0YHQvdC+0LLQsCDRgdGC0LDRgtGMINCx0L7Qu9GM0YjQtSBhCiAgaWYgYSA+IGIgdGhlbgogIGJlZ2luCiAgICB0ZW1wIDo9IGE7CiAgICBhIDo9IGI7CiAgICBiIDo9IHRlbXA7CiAgZW5kOwoKICAvLyDQotC10L/QtdGA0Ywg0YfQuNGB0LvQsCBhLCBiLCBjINGA0LDRgdC/0L7Qu9C+0LbQtdC90Ysg0L/QviDQstC+0LfRgNCw0YHRgtCw0L3QuNGOCiAgV3JpdGVMbignYT0nLCBhLCAnIGI9JywgYiwgJyBjPScsIGMpOwplbmQu