Инвертированное к некоторому натуральному числу X - это число, в котором все цифры исходного числа Х заптсаны в обратном порядке, если у результата есть лидирующие нули, они отбрасываются. Обозначим такое число Х1. Наришите прогрпмму которая сравнивает Х и Х1
Var x,x1,i:integer; xs:string; c:char; begin readln(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',x1) else writeln(x1,'=',x); end.
Пример ввода: 1230 Пример вывода: 1230>321
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
