Инвертированное к некоторому натуральному числу X - это число, в котором все цифры исходного числа Х заптсаны в обратном порядке, если у результата есть лидирующие нули, они отбрасываются. Обозначим такое число Х1. Наришите прогрпмму которая сравнивает Х и Х1

//PascalABC.NET 3.2 сборка 1318Var  x,x1,i:integer;  xs:string;  c:char;beginreadln(x);xs:=inttostr(x);for i:=1 to length(xs) div 2 do  begin    c:=xs[i];    xs[i]:=xs[length(xs)-i+1];    xs[length(xs)-i+1]:=c;  end;x1:=strtoint(xs);if x1>x then writeln(x1,'>',x) else  if x1<x then writeln(x,'>',x1) else    writeln(x1,'=',x);end.Пример ввода:1230Пример вывода:1230>321