Re: кАк таки решить ?

From
Anthony Volkov ()
To
Boris Pihtin
Date
2002-12-11T05:47:37Z
Area
RU.ALGORITHMS
From: "Anthony Volkov" <anthonyv@mail.redcom.ru>

Доброго здоровья, Boris!

Помнится, как-то было написано to aLL on Tue, 10 Dec 2002 23:55:25 +0300:

 BP> Есть 4х значное число надо проверить 3 цифры в нем одинаковы или нет
 BP> и вывести 1 ...
 BP> Надо это сделать с помощью математических преобразований без
 BP> проверок ...

В самом вопросе "надо проверить..." уже проверка. :)
Могу предложить так:

1) Заполняем набор (массив) из 4-х цифр следующими значениям:
      trunc(X/1000), - цифра в позиции тысяч
      trunc((X - trunc(x/1000)*1000)/100) - цифра в позиции сотен
      и т.д.

      [ X ] - исходное число
      [ trunc(X) ] - отбрасывание дробной части числа X без округления

2) Производим перебор всех элементов набора, если находим три одинаковых,
делаем все, что хочется.

-----------------------
С уважением, Волков Антон

"Глупость не освобождает от необходимости думать"
Франсуа де Ларошфуко


--- ifmail v.2.15dev5
 * Origin: REDCOM News Server (2:5020/400)