Показать сообщение отдельно
Старый 26.10.2016, 15:20   #1 (permalink)
iks2
Member
 
Регистрация: 22.10.2016
Сообщений: 62
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
По умолчанию Найти четырехзначное число

Задача
Найти наименьшее четырехзначное число такое, что это число является квадратом целого числа. Кроме того искомое число состоит только из четных не повторяющихся цифр. Программа позволила найти это число 4096.

Вопросы
1. Интересно, есть ли подобное число из всех пяти четных цифр?
2. Существует ли аналог подобного числа из нечетных цифр?

Код:
REM
REM   4096
REM

CLS
 
FOR i = 10 TO 100 STEP 2
   b = i * i
   n = INT(LOG(b) / LOG(10))
   a1 = b \ 10 ^ n
   a2 = b \ 10 ^ (n - 1) MOD 10
   IF a1 MOD 2 = 0 AND a2 MOD 2 = 0 THEN PRINT b;
NEXT i
END
iks2 вне форума   Ответить с цитированием
Ads

Яндекс

Member
 
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070