var
n, n1, m, a, b, l, i: longint;
begin
readln(a, b);
for n := a to b do
begin
l := 0;
n1 := n;
while n1 > 9 do
begin
m := n1 mod 10;
l := l * 10 + m;
n1 := n1 div 10
end;
l := l * 10 + n1;
if n = l
then writeln(n)
end;
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку