Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
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.
на каком япе? вот пример решения на паскале abc.
program test;
var s: string;
read(s);
write(s);
алфавит из 33 букв это:
аа, бб, вв, гг, дд, ее, ёё, жж, зз, ии, , кк, лл, мм, нн, оо, пп, рр, сс, тт, уу, фф, хх, цц, чч, шш, щщ, ъъ, , , ээ, юю, яя
Популярные вопросы