Rozważ strumień / plik z jedną liczbą całkowitą w wierszu. Na przykład:

123
5
99

Twój kod powinien wypisać sumę tych liczb, to znaczy 227.

Format wejściowy jest ściśle jedną liczbą całkowitą na wiersz. Nie można na przykład założyć, że dane wejściowe znajdują się w jednym wierszu jako tablica liczb całkowitych.

Możesz pobrać dane wejściowe ze STDIN, w postaci nazwy pliku lub pliku o wybranej nazwie; możesz wybrać który. Żadne inne sposoby uzyskania danych wejściowych są niedozwolone.

Dane wejściowe będą zawierać co najmniej jedną liczbę całkowitą. Możesz założyć, że wszystkie liczby całkowite są nieujemne, a ich całkowita suma jest mniejsza niż .232

05AB1E , 2 bajty

|O

Wyjaśnienie:

|   Get input as array
 O  Sum

Wypróbuj online!

Bash + coreutils, 16 bajtów

xargs|tr \  +|bc

Wypróbuj online!

Istnieją dwie spacje po \. Działa to również w przypadku liczb ujemnych.

Wyjaśnienie:

xargs             # known trick to turn newlines into spaces, while adding a
                  #trailing newline when printing the result (needed for bc)
|tr \  +          # turn spaces into '+'s
|bc               # calculates the sum

Możesz się zastanawiać, dlaczego tr \\n +|bcnie jest lepiej, ponieważ zamienia on nowe linie bezpośrednio w „+”. Cóż, ma 2 nieprzewidziane błędy:

• jeśli dane wejściowe mają końcowy znak nowej linii, to są konwertowane na końcowe „+”, stąd nie ma po nim liczby do wykonania dodawania
• a najbardziej dziwnym problemem jest to, że bc wymaga końca nowej linii po wejściu, ale właśnie zastąpiłeś wszystkie wejściowe znaki nowej linii znakami „+”.

MATL , 2 bajty

Us

To oczekuje danych wejściowych w pliku tekstowym o nazwie defin.

Gif lub tak się nie stało :

Lub wypróbuj online! ( dzięki Dennis za konfigurację! )

Wyjaśnienie

Po uruchomieniu programu MATL, jeśli definznaleziono nazwany plik (nazwa odnosi się do „domyślnego wejścia”), jego zawartość jest automatycznie ładowana jako tekst i przekazywana do stosu jako ciąg przed wykonaniem kodu.

Funkcja Uocenia ciąg, aby przekonwertować go na wektor kolumnowy liczb i soblicza sumę, która jest domyślnie wyświetlana.

Japt , 2 bajty

Nx

Wyjaśnienie

     Implicit: parse STDIN into array of numbers, strings, and arrays
N    Get the resulting parsed array.
 x   Sum.
     Implicit: output result of last expression

Wypróbuj online!

Wklej + BC, 13 bajtów

paste -sd+|bc

Wyjaśnienie:

paste -s        Take one line at a time from input
        d+      Joining by '+'
          |bc   Pass as expression to bc

Kolejna odpowiedź powłoki!

Perl 6 , 13 bajtów

say sum lines

Spróbuj

Wyjaśnienie

• lines()zwraca listę wierszy $*INlub $*ARGFILES„magiczny” uchwyt wprowadzania wiersza poleceń.
• sum(…)został dodany do Perla 6, aby umożliwić [+] Listoptymalizację pod kątem Pozycjonerów, które mogą obliczyć swoją sumę bez generowania wszystkich swoich wartości, takich jak 1..100000
  (myślałem, że sumjest tu po prostu zbyt słodki, by używać go [+]tak, jak normalnie)
• say(…)wywołaj .gistmetodę na jej wejściu i wypisze ją z dodatkową nową linią.

C, 53 bajty

r;main(i){for(;~scanf("%d",&i);r+=i);printf("%d",r);}

Python 3 , 28 bajtów

print(sum(map(int,open(0))))

Zaczerpnięte z tej wskazówki . Powiedziano mi, że to nie będzie działać w systemie Windows.

Wypróbuj online!

Siatkówka , 11 7 bajtów

-4 dzięki Martinowi Enderowi

.*
$*
1

Wypróbuj online!

Konwertuj na unary:

.*
$*

Policz liczbę 1s:

1

Brain-Flak , 20 bajtów

(([]){[{}]{}([])}{})

Wypróbuj online!

Wyjaśnienie

To gra golfowa od rozwiązania wykonanego przez Riley na czacie . Jego rozwiązaniem było:

([])({<{}>{}<([])>}{})

Jeśli znasz Brain-Flak, jest to dość oczywiste. Przesuwa wysokość stosu i zlicza jedną wartość podczas odliczania, a na koniec przesuwa sumę wszystkich przebiegów.

Jest to całkiem niezły golf, ale zeruje oba, {}a ([])jednak będą miały wartości, które różnią się tylko o jeden, więc jeśli zamiast tego usuniemy maski i zrobimy jedną z dwóch ujemnych, prawie powinni się anulować.

([])({[{}]{}([])}{})

Ponieważ zawsze różnią się one o jeden, mamy niefortunną okoliczność, w której nasza odpowiedź zawsze zależy od wysokości stosu. Aby temu zaradzić, wystarczy przesunąć początek pchnięcia, aby objąć pierwszą wysokość stosu.

(([]){[{}]{}([])}{})

Python 2, 40 bajtów

import sys;print sum(map(int,sys.stdin))

R 11 bajtów

sum(scan())

scanpobiera dane wejściowe, po jednym numerze w wierszu. I sumcóż, sumy.

Perl 5 , 9 bajtów

8 bajtów kodu + -pflaga.

$\+=$_}{

Wypróbuj online!

Za pomocą -p, wejście jest odczytywane po jednym wierszu na raz, zapisywane za $_każdym razem. Używamy $\jako akumulatora, ponieważ dzięki -pfladze jest ona domyślnie drukowana na końcu. Niedopasowane }{są używane, więc -pflaga drukuje tylko $\raz na końcu zamiast drukowania, $_a $\przy każdej linii czyta jak zwykle.

Pure Bash, 37 36 bajtów

Dzięki @KevinCruijssen za bajt!

while read a;do((b+=a));done;echo $b

Wypróbuj online!

Haskell, 32 bajty

interact$show.sum.map read.lines

Wypróbuj online! .

interactzbiera całe dane wejściowe ze standardowego wejścia, przekazuje je do funkcji podanej jako argument i wypisuje ciąg znaków, który odzyskuje z tej funkcji. Funkcja to:

            lines   -- split input into list of lines at nl
      map read      -- convert every line to a number (read is polymorphic,
                    -- but as want to sum it later, the type checker knows
                    -- it has to be numbers)
    sum             -- sum the list of numbers
show                -- convert back to string

PHP, 22 bajty

<?=array_sum(file(t));

Zakłada się, że istnieje plik o nazwie „t” z listą liczb całkowitych.

file()otwiera plik i zwraca tablicę z każdą linią zapisaną w tablicy osobnym elementem. array_sum()sumuje wszystkie elementy w tablicy.

Awk, 19 bajtów

{s+=$1}END{print s}

Wyjaśnienie:

{s+=$1}                For all lines in the input, add to s
        END             End loop
           {print s}    Print s

dc , 14 bajtów

0[+?z2=a]dsaxp

Wypróbuj online!

Wyjaśnienie:

 [      ] sa   # recursive macro stored in register a, does the following:
  +            # - sum both numbers on stack
               #   (prints to stderr 1st time since there's only 1)
   ?           # - read next line, push to stack as number
    z          # - push size of stack
     2         # - push 2
      =a       # - if stack size = 2, ? yielded something, so recurse
               # - otherwise end macro (implicit)
0              # push 0 (accumulator)
         d     # duplicate macro before storing it
            x  # Call macro
             p # The sum should be on the stack now, so print it

CJam , 5 bajtów

q~]1b

Wypróbuj online!

Jak to działa

q     e# Read all input from STDIN.
 ~    e# Evaluate that input, pushing several integers.
  ]   e# Wrap the entire stack in an array.
   1b e# Convert from base 1 to integer.
      e# :+ (reduce by sum) would work as well, but 1b handles empty arrays.

Python, 38 30 bajtów

lambda n:sum(map(int,open(n)))

W Pythonie pliki są otwierane przez open('filename')(oczywiście). Są jednak iterowalne. Za każdym razem, gdy iterujesz przez plik, pojawia się następny wiersz. Tak więc mapa iteruje każdą listę, wywołując intją, a następnie sumuje wynikową listę.

Zadzwoń z nazwą pliku jako wejściem. (tj. f('numbers.txt'))

8 bajtów zapisanych przy użyciu map(int, open(n)) zamiast zrozumienia listy. Oryginalny kod:

lambda n:sum([int(i)for i in open(n)]) 

Mathematica, 19 bajtów

Zakłada środowisko notebooka Mathematica.

Tr[#&@@@Import@"a"]

Oczekuje, że dane wejściowe znajdą się w pliku a.

Galaretka , 9 8 bajtów

ƈFпFỴVS

STDIN tak naprawdę nie jest rzeczą Jelly ...

Wypróbuj online!

Jak to działa

ƈFпFỴVS  Main link. No arguments. Implicit argument: 0

  п      While loop; while the condition returns a truthy value, execute the body
          and set the return value to the result. Collect all results (including 0,
          the initial return value) in an array and return that array.
ƈ           Body: Yield a character from STDIN or [] if the input is exhausted.
 F          Condition: Flatten, mapping 0 to [], '0' to "0", and [] to [] (falsy).
    F     Flatten the result.
     Ỵ    Split at newlines.
      V   Evaluate the resulting strings.
       S  Take the sum.

Brachylog , 4 bajty

ṇịᵐ+

Wypróbuj online!

Wyjaśnienie

ṇ         Split the Input on linebreaks
 ịᵐ       Map: String to Integer
   +      Sum

Pure Bash, 30

read -d_ b
echo $[${b//'
'/+}]

Wypróbuj online.

• reads plik wejściowy za jednym razem przechodzi do zmiennej b. -d_informuje, readże separatorem wiersza jest _zamiastnewline
• ${b//'newline'/+}zastępuje nowymi liniami w bz+
• echo $[ ... ] arytmetycznie ocenia wynikowe wyrażenie i wysyła je.

Vim, 16 bajtów / naciśnięć klawiszy

:%s/\n/+
C<C-r>=<C-r>"<C-h>

Ponieważ V jest wstecznie kompatybilny, możesz wypróbować online!

Pyth , 3 bajty

s.Q

Wypróbuj online!

 .Q  Read all of standard input, evaluating each line.
s    Take the sum.

jq , 5 bajtów

add, plus flaga wiersza poleceń -s .

Na przykład:

% echo "1\n2\n3\n4\n5" | jq -s add
15

Właściwie 2 bajty

kΣ

Wypróbuj online!

Wyjaśnienie:

kΣ
    (implicit input - read each line, evaluate it, and push it to the stack)
k   pop all stack elements and push them as a list
 Σ  sum
    (implicit output)

dc, 22

[pq]sq0[?z2>q+lmx]dsmx

Wydaje się to raczej dłuższe niż powinno, ale trudno jest zdecydować, kiedy osiągnięty zostanie koniec pliku. Jedynym sposobem, w jaki mogę to zrobić, jest sprawdzenie długości stosu po ?poleceniu.

Wypróbuj online .

[pq]                    # macro to `p`rint top-of-stack, then `q`uit the program
    sq                  # save the above macro in the `q` register
      0                 # push `0` to the stack.  Each input number is added to this (stack accumulator)
       [         ]      # macro to:
        ?               # - read line of input
         z              # - push stack length to stack
          2             # - push 2 to the stack
           >q           # - if 2 > stack length then invoke macro stored in `q` register
             +          # - add input to stack accumulator
              lmx       # - load macro stored in `m` register and execute it
                  d     # duplicate macro
                   sm   # store in register `m`
                     x  # execute macro

Uwaga: makro mnazywa się rekurencyjnie. Nowoczesne dcimplementują rekurencję ogona dla tego rodzaju rzeczy, więc nie powinno być obaw o przepełnienie stosu.

Pyke , 4 bajty

zbrs

Wypróbuj online!

z    -   input()
 b   -  int(^)
  r  - if no errors: goto start
   s - sum(stack)