Счастливое число - не "счастливый билет" :)

Счастливое число - это не то, что считали раньше на счастливых билетиках с 6-значными номерами (ныне постепенно исчезающих).

Это - вот что, то есть, находим сумму квадратов цифр числа, заменяем ей исходное число, а потом повторяем процесс, пока не останется единица (тогда число счастливое) или что-то другое (тогда не счастливое).

Например, число 67001 счастливое потому, что 6²+7²+1²=86, а 8²+6²=100, которое уж точно счастливо.

Кстати, если число счастливое, то и все члены его последовательности счастливы и наоборот. Кроме того, несчастливые числа склонны зацикливаться на последовательности остатков 4, 16, 37, 58, 89, 145, 42, 20, 4 и т.д., например, для числа 128 имеем цепочку
1²+2²+8² = 69,
6²+9² = 117,
1²+1²+7² = 51,
5²+1² = 26,
2²+6² = 40,
4²+0² = 16,
1²+6² = 37,
3²+7² = 58,
5²+8² = 89,
8²+9² = 145,
1²+4²+5² = 42,
4²+2² = 20,
2²+0² = 4
и дальше всё ясно :)

Вот этот код будет выводить последовательность A007770 (счастливых чисел) нужной длины size (или пока не зависнет браузер). Поэтому пишем числа просто старым добрым методом document.write, который, вообще-то, использовать не надо.

Просто мне понадобилось счастливое число побольше, чем приводится в сетевых источниках. Время выполнения кода может составить и десятки секунд при большом значении size. Сохранить код следует как обычный файл .html

<script type="text/javascript">
function happy(number) {
 var m, digit ;
 var cycle = [] ;
 while (number != 1 && cycle[number] !== true) {
  cycle[number] = true;
  summ = 0;
  while (number > 0) {
   digit = number % 10 ;
   summ += digit * digit;
   number = (number  - digit) / 10;
  }
  number = summ;
 }
 return (number == 1);
}
 
var number = 1,
    count = 0,
    size = 10000; //длина последовательности
while (count < size) {
 if (happy(number)) {
  document.write (number + '<br>');
  count++;
 }
 number++;
}
</script>
<noscript>Извините, Javascript отключён или недоступен в вашем браузере</noscript>

 Первые 10000 счастливых чисел, файл .txt в архиве .zip (24 Кб)

03.10.2017, 22:48 [2714 просмотров]