+ Задача № 37. Проверить, является ли натуральное число счастливым билетом

Особенность задачи в том , что нам неизвестно заранее с каким разрядом число рассматривается .

 <?php
 
//Пишем любое число
$a=8824567; 
// Число цифр в числе 
$count=1 ;
   // Пробуем подсчитать количество разрядов врядли 
      for ($i=1 ;  $a / pow (10,$i) >=1 ; $i++)
      {
        $count++ ;
      }  
      echo "Само число: ",$a , "<BR>";
    echo "Число знаков : " ,$count,"<BR>"  ;  
  //Определили количество цифр (разрядов) в числе 
  /*Теперь запишем условие : 1) если число имеет нечётное количество 
знаков , то вычитаем из количества знаков единичу и делим пополам и 
записываем результат в переменную $j , и вычисляем сумму всех цифр 
от первого цифры до переменной $j .Далее вычисляем сумму всех цифр
от переменной $j до числа $count (числа цифр) . Как посчитать сумму цифр ?  */
 //_________________________________________________________________________________________________________________ 
 /* !!! Очень важно заметить ! что % - это !целочисленный! остаток 
от деления числа на другое число. Даже если мы имеем число , 345,34 , 
и 345,34 % 10 мы имеем не 5,34 , а именно только 5  */
// $r и $l -это переменные суммы соответственно правой и левой
// частей числа 
   
  $r=0;
  $l=0;
   // Если количество цифр чётно то выполняем одну 
// группу циклов , со своими счётчиками
// если нечётно , то с другими
   if ($count % 2 == 0 )
      {
// Здесь количество цифр чётно
// значит справа проходим от последней
// цифры с порядком $count и до средней цифры
// $count/2  + 1 
              for ($j=$count ; $j >=  $count/2+1 ;$j--)
              {
// Считаем сумму правых цифр 
// Берем остаток от деления на 10 
                 $r  = $r  + $a % 10 ;
// Делим само число на 10 , чтобы передвигаться 
// налево 
                 $a= $a/10 ;
                                          
              }
// Считаем цифры справа и налево для левой часи
// Здесь счёт от count/2 до 1
               for ($j=$count/2; $j >=  1 ;$j--)
              {
// Так же считаем сумму цифр
                 $l  = $l  + $a % 10 ;
                 $a= $a/10 ;
                                          
              }
//Условие "счастливости"
               if ($r == $l)
               {
                   echo "Число счастливое " ;
               }
               else
               {
                   echo "Число не счастливое" ;
               }      
      }
// Если число нечётно то код вобщем такой же
// но , границы изменения счётчика другие 
      else
      {
              for ($j=$count ; $j >= ($count-1)/2+2 ;$j--) 
              {
                 $r  = $r  + $a % 10 ;
                 $a= $a/10 ;
                // echo "Нечетное число знаков и \$r=",$r;
                                          
              }
                $a=$a/10;
                for ($j=($count-1)/2; $j >=1   ;$j--)   
              {
                   
                 $l  = $l  + $a % 10 ;
                 $a= $a/10 ;
                // echo "Нечетное число знаков и \$l=",$l;
                                          
              }
               if ($r == $l)
               {
                   echo "Число счастливое " ;
               }
               else
               {
                   echo "Число не счастливое" ;
               }
      }
 ?>