Дано 4-х значное число. Определить, что больше само число или его перевёртыш.

Question

Дано 4-х значное число. Определить, что больше само число или его перевёртыш.

Экономика

Гость

Ответ(ы) на вопрос:

Accepted Answer

var n,a:integer; begin readln(n); a:=(n mod 10)*1000+((n mod 100) div 10)*100 + ((n mod 1000) div 100)*10+ n div 1000; if n>a then writeln('число ', n, ' больше перевертыша ', a) else writeln('перевертыш ', a, ' больше числа ', n); end.