• Натуральное число называется автоморфным , если оно равно последним цифрам своего квадрата. Например, 25^2=625 . Напишите программу, которая находит все автоморфные числа на отрезке [ a , b ] .

    Входные данные
    Входная строка содержит два натуральных числа – значения a и b , разделённых пробелами. Гарантируется, что a ≤ b .

    Выходные данные
    Программа должна вывести в одну строчку все автоморфные числа на отрезке [ a , b ] , разделив их пробелами. Если таких чисел нет, программа должна вывести число -1.

    Примеры
    входные данные
    20 100
    выходные данные
    25 76
    На паскале, через циклы, пожалуйста.

Ответы 1

  • PascalABC.NETbegin  var flag := true;  var a := readinteger;  var b := readinteger;  for var i := a to b do    if (i * i).ToString.EndsWith(i.ToString) then    begin      write(i, ' ');      flag := false;    end;  if flag then write(-1)end.
    • Автор:

      misha20
    • 6 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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