Ви професійний хакер, і ваш начальник щойно наказав вам допомогти кандидату виграти майбутні вибори. Ваше завдання - змінити дані машин для голосування, щоб підвищити результати кандидата.

Машини для голосування зберігають результати голосування як два цілих числа: кількість голосів за вашого кандидата ( v1) та кількість голосів за їх опонента ( v2).

Після тижневих досліджень ви виявили в системі дірку безпеки і можете збільшити значення v1на ціле число xі зменшити значення v2на те саме x. Але є обмеження, вам потрібно постійно підтримувати хеш-код безпеки:

• код хешу безпеки: (v1 + v2*2) modulo 7

Також значення для xмає бути мінімальним, щоб ваші зміни могли залишитися непоміченими.

Ваша програма повинна приймати як вхід v1і v2; він повинен вивести оптимальне значення для xцього v1>v2.

Є деякі випадки, за яких ви не можете зламати результати; вам не доведеться поводитися з ними (це може призвести до проблем з вашим начальником, але це вже інша історія).

Тестові справи

100,123 --> 14
47,23 --> 0
40,80 --> 21
62,62 --> 7
1134,2145 --> 511

Python 2, 30 байт

lambda u,t:max(0,(t-u)/14*7+7)

uце наші голоси, tє їхні голоси.

Python 2, 30 байт

lambda a,b:max((b-a)/14*7+7,0)

Математика, 22 байти

0//.x_/;2x<=#2-#:>x+7&

Чиста функція з аргументами #і #2. Має максимальну глибину рекурсії, якщо розбіжність більше 7*2^16 = 458752.

Пояснення

0                       Starting with 0,
 //.                    repeatedly apply the following rule until there is no change:
    x_                    if you see an expression x
      /;                    such that
        2x<=#2-#            2x <= #2-# (equivalently, #+x <= #2-x)
                :>        then replace it with
                  x+7       x+7 (hash is preserved only by multiples of 7)
                     &  End the function definition

Желе , 9 байт

IH:7‘×7»0

Спробуйте в Інтернеті!

Як це працює

IH:7‘×7»0  Main link. Argument: [v1, v2]

I          Increments; compute [v2 - v1].
 H         Halve the result.
  :7       Perform integer division by 7.
    ‘      Increment the quotient.
     ×7    Multiply the result by 7.
       »0  Take the maximum of the product and 0.

Власне , 13 байт

7;;τ((-\*+0kM

Спробуйте в Інтернеті!

Використовується та ж max((b-a)/14*7+7,0)формула, яку використовують xnor та orlp.

Пояснення:

7;;τ((-\*+0kM
7;;            3 copies of 7
   τ           double one of them
    ((-        bring the inputs back to the top, take their difference
       \*+     integer divide by 14, multiply by 7, add 7
          0kM  maximum of that and 0

Groovy, 41 37 байт

{x,y->[Math.floor((y-x)/14)*7+7,0].max()}

Це неназване закриття. Завдяки xnorі orlpдля формули і James holdernessза вказівку на помилку.

Попереднє рішення використовувалося intdiv()для цілого поділу, але воно поводиться інакше, ніж //у пітоні.

Спробуйте тут!

Haskell, 30 24 байти

a#b=max 0$div(b-a)14*7+7

Оператор інфіксації, який спочатку набирає кількість голосів вашого бажаного кандидата. Використовується та ж логіка, що й інші відповіді округлення /14*7+7.

J, 15 байт

0>.7+7*14<.@%~-

Щось цікаво, я працював над проблемою, і думав, що маю рішення, але, як виявляється, я помилявся. Ну добре. Спробуйте в Інтернеті! Ось результат:

   f =: 0>.7+7*14<.@%~-
   tests =: 123 100 ; 23 47 ; 80 40 ; 62 62 ; 2145 1134
   (,. f/ each) tests
┌─────────┬───┐
│123 100  │14 │
├─────────┼───┤
│23 47    │0  │
├─────────┼───┤
│80 40    │21 │
├─────────┼───┤
│62 62    │7  │
├─────────┼───┤
│2145 1134│511│
└─────────┴───┘

CJam, 13 12 15 байт

• Збережено байт завдяки Мартіну Ендеру.
• Додано 3 байти завдяки Мартіну Ендеру.
• Змінено ]на [завдяки ETHproductions.

q~\-Ed/m[)7*0e>

Відверто вкрали методи orlp та xnor.

Введення - це два числа, розділені пробілом: 100 123

Пояснення:

q~\-Ed/m])7*0e>
q~\-            e# Input two numbers, swap and subtract them.
    E           e# Push 0xE (15)
     d/m]       e# Float divide and take the floor.
         )7*    e# Increment and multiply by 7.
            0e> e# Max of this and 0.

Excel VBA, ₂₄ 20 байт

Immediates функція вікна , яка приймає вхідні дані з комірок A1і B1виходів до вікна VBE immediates.

?Int([A1-B1]/14)*7+7

Версія підпрограми, 43 байти

приймає введення b, cяк варіант \ ціле число та друкує у вікно безпосереднього VBE

Sub a(b,c):Debug.?Int((c-b)/14)*7+7:End Sub

Джулія 0,5 , 26 байт

v\w=max(fld(w-v,14)*7+7,0)

Спробуйте в Інтернеті!

PHP, 41 39 байт

    <?=7*max(0,1+($argv[2]-$argv[1])/14|0);

приймає дані з аргументів командного рядка; бігати з -r.

7 5 додаткових байтів просто для обробки $ a> $ b: - /

Japt , 14 байт

V-U /2+7 f7 w0

Запусти його сюди!

Дякую ETHproductions за бриття 3-х байт!

05AB1E , 9 байт

-14÷>7*0M

Спробуйте в Інтернеті!

Пояснення

-          # push difference of inputs
 14÷       # integer divide by 14
    >      # increment
     7*    # times 7
       0   # push 0
        M  # take max

Або відповідна функція з тим самим числом байтів, що працює на парі чисел

Î¥14÷>7*M

Спробуйте в Інтернеті!

Діалог APL , 14 байт

Приймається v1як правий аргумент і v2як лівий аргумент.

0⌈7×1+(⌊14÷⍨-)

0 ⌈ максимум нуля і

7 × сім разів

1 + (... ) один плюс ...

 ⌊ пол

 14 ÷⍨ чотирнадцятого о

 - різниця (між аргументами)

СпробуйтеAPL онлайн!

Befunge, 19 байт

777+:&&\-+\/*:0`*.@

Спробуйте в Інтернеті!

Це спирається на дещо іншу формулу, яку застосовують orlp та xnor, оскільки інтерпретатор посилання Befunge має різні правила округлення до Python. У Befunge також немає розкоші maxоперації.

Основний розрахунок виглядає так:

x = (v2 - v1 + 14)/14*7
x = x * (x > 0)

Докладніше вивчаючи код:

7                     Push 7                                      [7]
 77+:                 Push 14 twice.                              [7,14,14]
     &&               Read v1 and v2 from stdin.                  [7,14,14,v1,v2]
       \-             Swap the values and subtract.               [7,14,14,v2-v1]
         +            Add the 14 that was pushed earlier.         [7,14,14+v2-v1]
          \/          Swap the second 14 to the top and divide.   [7,(14+v2-v1)/14]
            *         Multiply by the 7 that was pushed earlier.  [7*(14+v2-v1)/14 => x]
             :        Make a copy of the result                   [x,x]
              0`      Test if it's greater than 0.                [x,x>0]
                *     Multiply this with the original result.     [x*(x>0)]
                 .@   Output and exit.

Ідіть , 36 байт

func(a,b int)int{return(b-a)/14*7+7}

Спробуйте в Інтернеті!

JavaScript (ES6), 31 байт

(a,b,c=(b-a)/14|0)=>c>0?c*7+7:0

f=(a,b,c=(b-a)/14|0)=>c>0?c*7+7:0
document.write(f(1134,2145))

Java 8, 31 байт

(a,b)->b<a?0:(a=(b-a)/2)+7-a%7;

Це лямбда-вираз, який можна присвоїти IntBinaryOperator.

a - голоси вашого кандидата, b - ваші опоненти.

java закріплюється на ділення на додатні цілі числа, тому +7-a%7використовується для підбивання значення до наступного кратного 7.

Рубі, 26 27 байт

->a,b{[(b-a)/14*7+7,0].max}

В основному те саме, що рішення Python xnor's та orlp, з поворотом (не потрібно додавати 7 через негативний модуль, економить 1 байт в рубіні, не знаю про python)

Ніякого повороту, поворот був просто поганим випадком когнітивного дисонансу. Забудь це. Дійсно. :-)

Scala, 31 байт

(a,b)=>Math.max((b-a)/14*7+7,0)

Потрійна версія на 2 байти довша

Локшина , 16 байт

⁻÷14ɲL×7⁺7ḋɲl⁺÷2

Витягнути рівняння з відповідей xor та orlp , але оскільки Noodel не має максимальних можливостей, потрібно було обійти це.

Спробуй це:)

Як це працює

⁻÷14ɲL×7⁺7       # The equation...
⁻                # v2 - v1
 ÷14             # Pops off the difference, then pushes on the (v2 - v1)/14
    ɲL           # Applies lowercase which for numbers is the floor function.
      ×7         # Multiplies that by seven.
        ⁺7       # Then increments it by seven.

          ḋɲl⁺÷2 # To relate with the other answers, this takes the max between the value and zero.
          ḋ      # Duplicates what is on the top of the stack (which is the value just calculated).
           ɲl    # Pops off the number and pushes on the magnitude (abs value).
             ⁺   # Add the abs to itself producing zero if the number came out negative (which means we are already winning).
              ÷2 # Divides the result by two, which will either be zero or the correct offset.

Pyth , 16 байт

MtS+0[+7*7/-HG14

Спробуйте тут!