var
a, b,i,m,n,d,j : integer;
s:string;
log:boolean;
input,output:text;
begin
assign(input,'input.txt');
reset(input);
read(input,a,b);
close(input);
assign(output,'output.txt');
rewrite(output);
for i:=a to b do
begin
m:=i;
s:='';
while m>0 do begin // переводим число в строковой формат
s:=inttostr(m mod 2)+s;
m:=m div 2;
end;
n:=length(s);
log:=true;
for j:=1 to n div 2 do
if log and(s[j]<>s[n-j+1]) then log:=false; // число не симметричное
if log then write(output,i,' '); // если число симметричное, то выводим его
end;
close(output);
end.
Природные ресурсы Дальнего Востока богаты и разнообразны, но в связи с отсутствием развитой наземной транспортной системы и удаленностью их вывоз в другие регионы России довольно трудоемкий процесс. В то же время в другие страны, такие, как, например, Япония, США, Корея, Малайзия и т. д., вывоз сырья производится через порты Тихого океана (Владивосток, Находка, Южно-Сахалинск, Магадан, Петронавловск-Камчатск, Анадырь). Возможность использовать это сырье внутри района для развития промышленного производства осуществляется путем добычи и обогащения руд цветных металлов (олова, свинца, цинка, вольфрама, золота и др.).
Природные ресурсы Дальнего Востока богаты и разнообразны, но в связи с отсутствием развитой наземной транспортной системы и удаленностью их вывоз в другие регионы России довольно трудоемкий процесс. В то же время в другие страны, такие, как, например, Япония, США, Корея, Малайзия и т. д., вывоз сырья производится через порты Тихого океана (Владивосток, Находка, Южно-Сахалинск, Магадан, Петронавловск-Камчатск, Анадырь). Возможность использовать это сырье внутри района для развития промышленного производства осуществляется путем добычи и обогащения руд цветных металлов (олова, свинца, цинка, вольфрама, золота и др.).
a, b,i,m,n,d,j : integer;
s:string;
log:boolean;
input,output:text;
begin
assign(input,'input.txt');
reset(input);
read(input,a,b);
close(input);
assign(output,'output.txt');
rewrite(output);
for i:=a to b do
begin
m:=i;
s:='';
while m>0 do begin // переводим число в строковой формат
s:=inttostr(m mod 2)+s;
m:=m div 2;
end;
n:=length(s);
log:=true;
for j:=1 to n div 2 do
if log and(s[j]<>s[n-j+1]) then log:=false; // число не симметричное
if log then write(output,i,' '); // если число симметричное, то выводим его
end;
close(output);
end.