10

^{Wyzwanie Podjęte za zgodą mojego konkursu na University Code Challenge}

Po ukończeniu studiów kilka miesięcy temu Marie otworzyła konto bankowe, aby zacząć otrzymywać wynagrodzenie za pierwszą pracę w mieście. Od tego czasu przeprowadzała z nim kilka transakcji. Jej pierwsza płatność wyniosła 1000 dolarów. Za te pieniądze zapłaciła za obiad, na który zaprosiła rodziców (obiad kosztował 150 USD), a następnie dokonała zakupu w znanym supermarkecie (80 USD) i rezerwacji hotelu na wakacje (200 USD). Pod koniec miesiąca ponownie otrzymała zapłatę (1040 dolarów, nieco więcej niż w poprzednim miesiącu), a następnego dnia wydała kolejne 70 dolarów w supermarkecie.

Dzisiaj zdała sobie sprawę, że jeśli po zapłaceniu pierwszych 80 dolarów w supermarkecie zostanie utworzone drugie konto, a pierwsze zamrożone, oba konta będą miały dokładnie takie samo saldo:

\underset{T o t a l = 770}{\underset{⏟}{1000 - 150 - 80}} \underset{T o t a l = 770}{\underset{⏟}{- 200 1040 - 70}}

$\underbrace{1000\quad -150\quad -80}_{Total=770}\quad \underbrace{-200\quad 1040\quad -70}_{Total=770}$

Wydarzenie było dla niej tak rzadkie, że chce dalej sprawdzać, czy ruchy jej konta i ruchy jej przyjaciół mają tę funkcję, czy nie.

Wyzwanie

Biorąc pod uwagę listę transakcji, podaj liczbę przypadków, w których właściciel konta bankowego mógł utworzyć drugie konto, aby oba miały takie samo saldo końcowe.

Przykład: [1000, -150, -80, -200, 1040, -70]

1) \underset{T o t a l = 0}{\underset{⏟}{}} \underset{T o t a l = 1540}{\underset{⏟}{1000 - 150 - 80 - 200 1040 - 70}}

$\color{red}{1)\quad\underbrace{}_{Total=0}\quad \underbrace{1000\quad -150\quad -80\quad -200\quad 1040\quad -70}_{Total=1540}}$

2) \underset{T o t a l = 1000}{\underset{⏟}{1000}} \underset{T o t a l = 540}{\underset{⏟}{- 150 - 80 - 200 1040 - 70}}

$\color{red}{2)\quad\underbrace{1000}_{Total=1000}\quad \underbrace{-150\quad -80\quad -200\quad 1040\quad -70}_{Total=540}}$

3) \underset{T o t a l = 850}{\underset{⏟}{1000 - 150}} \underset{T o t a l = 690}{\underset{⏟}{- 80 - 200 1040 - 70}}

$\color{red}{3)\quad\underbrace{1000\quad -150}_{Total=850}\quad \underbrace{-80\quad -200\quad 1040\quad -70}_{Total=690}}$

4) \underset{T o t a l = 770}{\underset{⏟}{1000 - 150 - 80}} \underset{T o t a l = 770}{\underset{⏟}{- 200 1040 - 70}}

$\color{green}{4)\quad\underbrace{1000\quad -150\quad -80}_{Total=770}\quad \underbrace{-200\quad 1040\quad -70}_{Total=770}}$

5) \underset{T o t a l = 570}{\underset{⏟}{1000 - 150 - 80 - 200}} \underset{T o t a l = 970}{\underset{⏟}{1040 - 70}}

$\color{red}{5)\quad\underbrace{1000\quad -150\quad -80\quad-200}_{Total=570}\quad \underbrace{ 1040\quad -70}_{Total=970}}$

6) \underset{T o t a l = 1610}{\underset{⏟}{1000 - 150 - 80 - 200 1040}} \underset{T o t a l = - 70}{\underset{⏟}{- 70}}

$\color{red}{6)\quad\underbrace{1000\quad -150\quad -80\quad -200\quad 1040}_{Total=1610}\quad \underbrace{-70}_{Total=-70}}$

7) \underset{T o t a l = 1540}{\underset{⏟}{1000 - 150 - 80 - 200 1040 - 70}} \underset{T o t a l = 0}{\underset{⏟}{}}

$\color{red}{7)\quad\underbrace{1000\quad -150\quad -80\quad-200\quad 1040\quad -70}_{Total=1540}\quad \underbrace{}_{Total=0}}$

Przypadek testowy

Wejście: 1000 -150 -80 -200 1040 -70Wyjście:1
Wejście: 100 -100Wyjście:2
Wejście: 1 2 3Wyjście:1
Wejście: 10 -20 15Wyjście:0
Wejście: 15 -15 15 -15Wyjście:3
Wejście: 1Wyjście:0

Notatki

Możesz założyć, że nie będzie żadnej transakcji o wartości 0 USD
Możesz wziąć wkład w dowolny rozsądny sposób

code-golf

— Luis Felipe De Jesus Munoz
źródło

11

Po 6 miesiącach zamrożonych i nowo utworzonych kont doniesiono, że bankier Marie jest teraz internowany w sanatorium. „Jesteśmy twoimi przyjaciółmi. Potrzebujesz odpoczynku”, powiedzieli.

— Arnauld

2

Sugerowany przypadek testowy pojedynczej transakcji

— Veskah

5

C # (interaktywny kompilator Visual C #) , 63 bajty

n=>n.Append(0).Where((a,b)=>n.Take(b).Sum()*2==n.Sum()).Count()

Zaoszczędź 6 bajtów dzięki dana

Rachunki równoległe (dzień 2)

C # (interaktywny kompilator Visual C #) , 63 bajty

Perl 6 , 25 bajtów

Wyjaśnienie

05AB1E , 11 bajtów

Galaretka , 11 6 bajtów

JavaScript (Node.js) , 45 bajtów

Perl 5 -p , 42 41 bajtów

JavaScript (ES6), 52 bajty

Skomentował

Wersja rekurencyjna, 54 53 bajtów

APL (Dyalog Unicode) , 21 bajtów SBCS

Partia, 84 bajtów

Węgiel drzewny , 15 bajtów

Python 3 , 67 58 bajtów

R , 50 37 bajtów

MATL , 9 bajtów

Japt -x , 14 11 bajtów

PowerShell , 88 82 bajtów

PowerShell , 49 45 36 bajtów

Brachylog , 9 bajtów

Wyjaśnienie

bash, 52 bajty

Haskell, 46 35 bajtów

J , 19 bajtów

wyjaśnienie

Perl 5 `-p` , 42 41 bajtów

APL (Dyalog Unicode) , 21 bajtów ^SBCS

Japt `-x` , 14 11 bajtów