Форум на Исходниках.RU https://forum.sources.ru Форум на Исходниках.RU Форум на Исходниках.RU https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1140670 Fri, 16 Jun 2006 15:10:03 +0000 Проверка делимости на 6 https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1140670 arcsupport Алгоритмы https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1139361 Thu, 15 Jun 2006 17:16:13 +0000 Проверка делимости на 6 https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1139361 Romtek
> "Сомневаюсь, что получится быстрее % 6 (mod 6) вручную, чем компилятором"

А я сомневаюсь в том, что компилятор в данном случае использует что-либо кроме банального и тормозного деления ;)
Хотя методы быстрого деления и умножения на константы хорошо известны. К примеру определение остатка от деления на 6 можно записать на асме так (для положительных чисел)
    function Mod6(x:integer):integer; register;
    asm //число x в eax
      mov ecx,eax
      mov edx,$AAAAAAAB   //0AAAAAAABh = round((2^34)/6)
      mul edx             //edx:eax = x*round((2^34)/6)
      shr edx,2           //эквивалентно * 2^34 => в edx частное
      mov eax,ecx        
      lea edx,[edx+edx*2] //*3
      add edx,edx         //*2
      sub eax,edx         //остаток
    end;
]]> leo Алгоритмы https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1139331 Thu, 15 Jun 2006 16:41:56 +0000 Проверка делимости на 6 https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1139331 Цитата KAV @
Еще один способ, правда, не для быстроты реализации, а просто так:
число делится на K, если его сумма цифр делится на K в K+1 - ричной системе счисления

Ну, тогда еще один способ:
Число делится на К, если в К-ричной системе счисления в младшем разряде - 0.]]> MIF Алгоритмы https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1139328 Thu, 15 Jun 2006 16:36:24 +0000 Проверка делимости на 6 https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1139328 число делится на K, если его сумма цифр делится на K в K+1 - ричной системе счисления
Поэтому-то и есть признак делимости на 9, потому что у нас 10-ричная система :).]]> KAV Алгоритмы https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1139296 Thu, 15 Jun 2006 16:08:28 +0000 Проверка делимости на 6 https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1139296 Цитата LuckLess @
числа 4,5,6 .. 21 делиться только на 3..

Ты наверно (или я плохо объяснил) не так понял меня. Вот есть число X. Если оно делится на 4, 5, 6, то оно делится на 6... ну тут очевидно. Или если X делится на 20 21 22, то оно делится на 6 и аналогично, например если оно делится на 123 124 125... то делится на 6, т.к. 124 четное, 123 кратно 3... и.т.п.]]> p_kolya Алгоритмы https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1139193 Thu, 15 Jun 2006 14:49:46 +0000 Проверка делимости на 6 https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1139193
    k=clng(x/6)
    if k*6=x then
    'делится
    else
    'не делится
    endif

clng(x/6)-преобразование в Long. Дробная часть отбрасывается. аналогично int(x), но вроде немного побыстрее работает.]]> BlackSnake Алгоритмы https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1139109 Thu, 15 Jun 2006 14:18:15 +0000 Проверка делимости на 6 https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1139109 Flex Ferrum Алгоритмы https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1139093 Thu, 15 Jun 2006 14:12:29 +0000 Проверка делимости на 6 https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1139093 Цитата arcsupport @
Как ОЧЕНЬ быстро проверить, делится ли число на 6 (шесть)?
Отнимай от N цифру 6 в цикле до тех пор, пока число не станет меньше либо равным 6. Если равно 0, то делится без остатка.
Сомневаюсь, что получится быстрее % 6 (mod 6) вручную, чем компилятором. :)]]> Romtek Алгоритмы https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1139045 Thu, 15 Jun 2006 13:54:02 +0000 Проверка делимости на 6 https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1139045 Цитата p_kolya @
Число делится на 6, если делится на каждое из 3 вподряд идущих числа. Т.е. N делится на 6, если оно делится на m, m+1, m+2, (или m*(m+1)*(m+2)) где m целое. Это изходя из того, что одно из этих трех чисел четное и одно делится на 3 (т.е. каждое третье число делится на 3 :)).

:no: :no:



числа 4,5,6 .. 21 делиться только на 3..]]> LuckLess Алгоритмы https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1139042 Thu, 15 Jun 2006 13:51:10 +0000 Проверка делимости на 6 https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1139042 p_kolya Алгоритмы https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1138956 Thu, 15 Jun 2006 12:47:35 +0000 Проверка делимости на 6 https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1138956
    if(!Number%6)
       printf("\nЧисло делится на 6\n");
    else
       printf("\nЧисло не делится на 6\n");


Pascal:
    if (Number mod 6) = false then
       writeln('Число делится на 6');
    else
       writeln('Число не делится на 6');

Вроде так, хотя я такой ламер, что могу неправильно понять задание или что-то не так написать :)]]> BlackRabbit Алгоритмы https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1138842 Thu, 15 Jun 2006 11:51:33 +0000 Проверка делимости на 6 https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1138842 признаки делимости]]> arcsupport Алгоритмы https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1138833 Thu, 15 Jun 2006 11:48:38 +0000 Проверка делимости на 6 https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1138833 Цитата arcsupport @
Как ОЧЕНЬ быстро проверить, делится ли число на 6 (шесть)?

Четное и сумма цифр делится на три.]]> Flex Ferrum Алгоритмы https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1138832 Thu, 15 Jun 2006 11:48:35 +0000 Проверка делимости на 6 https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1138832 MIF Алгоритмы https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1138821 Thu, 15 Jun 2006 11:42:33 +0000 Проверка делимости на 6 https://forum.sources.ru/index.php?showtopic=145367&view=findpost&p=1138821 arcsupport Алгоритмы