Закон Кірхгофа говорить, що коли ви підсумуєте всі струми (позитивні для струмів, що йдуть на перехід, і негативні для струму, що виходять з переходу), ви завжди отримаєте результат 0.

Подивіться на наступну схему:

Використовуючи закон Кірхгофа, ви бачите, що i1 + i4 - i2 - i3 = 0, тому i1 + i4 = i2 + i3.

Дано два списки: один із усіма струмами, що надходять на перехід, і один із усіма струмами, що виходять із вузла, крім одного, виводять останній.

Тести:

[1, 2, 3], [1, 2] = 3
[4, 5, 6], [7, 8] = 0
[5, 7, 3, 4, 5, 2], [8, 4, 5, 2, 1] = 6

У другому списку завжди є на один пункт менше, ніж у першому. Вихід не може бути негативним. Найменша програма виграє.

Желе, 2 байти

_S

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

Приймає вхідні струми в перший аргумент, а вихідні струми в другий аргумент. _віднімає їх попарно, залишаючи єдиний елемент з більш тривалого списку таким, як є, і Sпідсумовує результат.

Хаскелл, 14 байт

(.sum).(-).sum

Приклад використання: ( (.sum).(-).sum ) [5,7,3,4,5,2] [8,4,5,2,1]-> 6.

Підсумовуйте кожен список і приймайте різницю.

CJam, 8 6 байт

q~.-:+

Вхід використовує два масиви у стилі CJam.

Запустити всі тестові справи. (Це читає декілька тестових випадків одночасно і включає рамку для обробки кожного рядка окремо, відкидаючи очікуваний результат від введення даних.)

Пояснення

q~  e# Read and evaluate input.
.-  e# Elementwise difference.
:+  e# Get sum.

.-працює надійно, оскільки ми гарантуємо, що перший список завжди довший, ніж другий. (В іншому випадку сторонні елементи другого списку будуть додані до результату, що додасть їх до суми, а не віднімає їх.)

MATL , 3 4,0 байт

_hs

Вхідні дані: спочатку залишають струми, потім вводять струми.

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

_     % implicitly input array with leaving currents (except one). Negate
h     % implicitly input array with entering currents. Concatenate  
s     % sum of all elements in concatenated array

Javascript, 36 байт

(a,b)=>eval(a.join`+`+'-'+b.join`-`)

f=
(a,b)=>
    eval(
        a.join`+`
        +'-'+
        b.join`-`
    )

document.body.innerHTML = '<pre>' +
  'f([1,2,3],[1,2]) = ' + f([1,2,3],[1,2]) + '\n' +
  'f([4,5,6],[7,8]) = ' + f([4,5,6],[7,8]) + '\n' +
  'f([5,7,3,4,5,2],[8,4,5,2,1]) = ' + f([5,7,3,4,5,2],[8,4,5,2,1]) + '\n' +
'</pre>'

05AB1E , 4 байти

Код:

OEO-

Пояснення:

O     # Take the sum of the input list
 E    # Evaluate input
  O   # Take the sum of the input list
   -  # Substract from each other

Дякую Луїсу Мендо за те, що він нагадав мені, що мені потрібно реалізувати об'єднану функцію. Якби я раніше його реалізував, це було б 3 байти:

Неконкурентна версія (3 байти):

Перший список є поточним поточним списком, другий - поточним списком. Код:

(«O

Пояснення:

(    # Negate the list, e.g. [3, 4, 5] would become [-3, -4, -5]
 «   # Concatenate the second list to the first
  O  # Take the sum and implicitly output it

Використовує кодування CP-1252.

Математика, 17 11 байт

Tr@#-Tr@#2&

Досить просто.

Звичайний Лісп, 40

(lambda(x y)(-(reduce'+ x)(reduce'+ y)))

Perl 6 , 11 байт

*.sum-*.sum

Використання:

# give it a lexical name
my &code = *.sum-*.sum;

say code [1, 2, 3], [1, 2]; # 3
say code [4, 5, 6], [7, 8]; # 0
say code [5, 7, 3, 4, 5, 2], [8, 4, 5, 2, 1]; # 6

Python 3, 24 байти

lambda a,b:sum(a)-sum(b)

або

Python 2, 19 байт

print sum(a)-sum(b)

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

ES6, 39 байт

(i,o)=>i.reduceRight((r,a,j)=>r+a-o[j])

Тому що я хотів використовувати reduceRight.

Python 2, 30 байт

a,b=map(sum,input());print a-b

Pyth, 6 байт

-.*sRQ

Пояснення

       - autoassign Q = eval(input())
   sRQ - map(sum, Q)
-.*    - imp_print(minus(*^))

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

К5, 5 байт

-/+/'

Різниця над ( -/) сумою над ( +/) кожним ( ').

Дія:

  (-/+/')'((1 2 3;1 2);(4 5 6;7 8);(5 7 3 4 5 2;8 4 5 2 1))
3 0 6

Pyth, 5 байт

-FsMQ

Спробуйте в Інтернеті. Тестовий набір.

Map sв обох вхідних списках, а потім Fстаре віднімання (- ).

Це також може бути записане як -sQsE, яке займає списки у два рядки.

𝔼𝕊𝕄𝕚𝕟, 5 знаків / 7 байт

⨭î-⨭í

Try it here (Firefox only).

Вут.

Пояснення

sum(input1) - sum(input2)

Звичайний Lisp REPL, SBCL 28 24 байт

запишіть це в REPL:

#.`(-(+ #1=,@(read))#1#)

потім запишіть такі вхідні списки:

(2 3 4)
(2 3)

Я сподіваюся, що добре використовувати такий формат списку (замість наприклад '(2 3 4)), який я використовував відповідь coredump як формулу свого рішення, а потім домігся його ефекту обчислення по-іншому.

Пояснення

Дозволяти e_1,...,e_nбути елементами першого списку та f_1,...,f_{n-1}бути елементами другого списку. Ми хочемо оцінити вираз(-(+ e_1 e_2 ... e_n)f_1 f_2 ...f_{n-1}) Це означатиме віднімання елементів другого списку із суми елементів першого списку. Необхідний вираз будується так:

backqoute зупиняє оцінку

#1= економить трохи писання, запам'ятовування ,@(read)

,@ зупиняє ефекти зворотного котирування (щоб оцінити (читати)) та виводити елементи зі списку.

(read) запитує введення

#1# "завантажує" об'єкт Lisp, збережений #1=

#. робить оцінку друкованого зображення об’єкта Lisp