Ребят помогите с задачей в Pacal.
Натуральное число называется палиндромом, если его запись читается одинаково с начала и с конца (например: 1,22,393). Найти все меньшие 100 натуральные числа , которые при возведении в квадрат дают палиндром.
Натуральное число называется палиндромом, если его запись читается одинаково с начала и с конца (например: 1,22,393). Найти все меньшие 100 натуральные числа , которые при возведении в квадрат дают палиндром.
More Questions From This User See All
Answers & Comments
i,w,q,e:integer;
begin
for i:=1 to 100 do
begin
q:=0;
w:=i*i;
e:=w;
while e>0 do
begin
q:=q*10+ e mod 10;
e:=e div 10;
end;
if q=w then
write(i,' ');
end;
end.