program returnMin;
var
i: byte;
q: byte;
a: word;
t: word;
num:array[1..3] of word;
procedure swap(var x, y: word);
var temp: word;
begin
temp := x;
x := y;
y := temp;
end;
begin
t:=100;
readln(a);
if (a<100) or (a>999) then writeln('Nepravylne chyslo')
else
for i:=1 to 3 do begin
num[i] := (trunc(a/t) - trunc(a/(t*10))*10); t := trunc(t/10); end;
if num[2]>num[3] then swap(num[2], num[3]);
if num[1]>num[2] then swap(num[1], num[2]);
if num[2]>num[3] then swap(num[2], num[3]);
writeln(num[1]*100+num[2]*10+num[3]);
end.
cHJvZ3JhbSByZXR1cm5NaW47CnZhcgppOiBieXRlOwpxOiBieXRlOwphOiB3b3JkOwp0OiB3b3JkOwpudW06YXJyYXlbMS4uM10gb2Ygd29yZDsKCnByb2NlZHVyZSBzd2FwKHZhciB4LCB5OiB3b3JkKTsKdmFyIHRlbXA6IHdvcmQ7CmJlZ2luCnRlbXAgOj0geDsKeCA6PSB5Owp5IDo9IHRlbXA7CmVuZDsKCmJlZ2luCnQ6PTEwMDsKcmVhZGxuKGEpOwppZiAoYTwxMDApIG9yIChhPjk5OSkgdGhlbiB3cml0ZWxuKCdOZXByYXZ5bG5lIGNoeXNsbycpCmVsc2UgCmZvciBpOj0xIHRvIDMgZG8gYmVnaW4KCW51bVtpXSA6PSAodHJ1bmMoYS90KSAtIHRydW5jKGEvKHQqMTApKSoxMCk7IHQgOj0gdHJ1bmModC8xMCk7IGVuZDsKaWYgbnVtWzJdPm51bVszXSB0aGVuIHN3YXAobnVtWzJdLCBudW1bM10pOwppZiBudW1bMV0+bnVtWzJdIHRoZW4gc3dhcChudW1bMV0sIG51bVsyXSk7CmlmIG51bVsyXT5udW1bM10gdGhlbiBzd2FwKG51bVsyXSwgbnVtWzNdKTsKd3JpdGVsbihudW1bMV0qMTAwK251bVsyXSoxMCtudW1bM10pOwplbmQu