{* Задача386 *}

REM basic

' Билет перевертыш- это такой билет с шестизначным номером, которое читается одинаково слева и наоборот. Например 627726. Составить программу, для нахождения всех таких номеров счастливых билетов, что если извлечь из данного числа квадратный корень, то значение будет целым числом.


For i = 100 To 999
a = i * 1000 + (i Mod 10) * 100 + (i  10 Mod 10) * 10 + i  100
If SQR(a) = INT(SQR(a)) Then PRINT a;
Next
End