• Ребят помогите с задачей в Pacal.
    Натуральное число называется палиндромом, если его запись читается одинаково с начала и с конца (например: 1,22,393). Найти все меньшие 100 натуральные числа , которые при возведении в квадрат дают палиндром.

Ответы 2

  • Спасибо большое :)
    • Автор:

      kalanbxyc
    • 6 лет назад
    • 0
  • var i,w,q,e:integer;beginfor i:=1 to 100 dobeginq:=0;w:=i*i;e:=w;while e>0 dobeginq:=q*10+ e mod 10;e:=e div 10;end;if q=w then write(i,' ');end;end.
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years