한 줄에 하나의 정수를 가진 스트림 / 파일을 고려하십시오. 예를 들면 다음과 같습니다.

123
5
99

코드는이 숫자의 합, 즉를 출력해야합니다 227.

입력 형식은 라인 당 하나의 정수입니다. 예를 들어, 입력이 정수 배열로 한 줄에 있다고 가정 할 수 없습니다.

STDIN에서 파일 이름 형식으로 또는 원하는 이름의 파일을 입력 할 수 있습니다. 당신은 어느 것을 선택할 수 있습니다. 입력을받는 다른 방법은 허용되지 않습니다.

입력에는 하나 이상의 정수가 포함됩니다. 모든 정수가 음이 아니며 총 합이보다 작다고 가정 할 수 있습니다 .232

05AB1E , 2 바이트

|O

설명:

|   Get input as array
 O  Sum

온라인으로 사용해보십시오!

배쉬 + coreutils, 16 바이트

xargs|tr \  +|bc

온라인으로 사용해보십시오!

뒤에 공백이 두 개 있습니다 \. 이것은 음수에도 적용됩니다.

설명:

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

tr \\n +|bc개행을 직접 '+'로 변환하기 때문에 왜 좋지 않은지 궁금 할 것 입니다. 글쎄, 그것은 예기치 않은 두 가지 오류가 있습니다.

• 입력에 후행 줄 바꿈이 있으면 후행 '+'로 변환되므로 추가 후 수행 할 숫자가 없습니다.
• 가장 이상한 문제는 bc에 입력 뒤에 줄 바꿈이 필요하지만 모든 입력 줄 바꿈을 '+'로 바꾼 것입니다.

MATL , 2 바이트

Us

이것은이라는 텍스트 파일의 입력을 예상합니다 defin.

Gif 또는 발생하지 않았습니다 .

또는 온라인으로 사용해보십시오! ( 설정해 주신 Dennis에게 감사합니다! )

설명

MATL 프로그램이 실행될 때, 호출 된 파일 defin이 발견되면 (이름은 "기본 입력"을 참조), 내용은 자동으로 텍스트로로드되고 코드를 실행하기 전에 문자열로 스택에 푸시됩니다.

함수 U는 문자열을 평가하여 숫자로 구성된 열 벡터로 변환하고 s암시 적으로 표시되는 합계를 계산합니다.

Japt , 2 바이트

Nx

설명

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

온라인으로 사용해보십시오!

붙여 넣기 + bc, 13 바이트

paste -sd+|bc

설명:

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

또 다른 쉘 답변!

펄 6 , 13 바이트

say sum lines

시도 해봐

설명

• lines()에서 라인의 목록 반환 $*IN또는 $*ARGFILES는 "마법"명령 줄 입력 핸들을.
• sum(…)펄 6에 추가 할 수 있도록 [+] List처럼 자신의 모든 값을 생성하지 않고 그 합을 계산할 수 있습니다 Positionals에 최적화하기 위해 1..100000
  (난 그냥 생각 sum사용에 여기 너무 귀여웠다 [+]나는 평소처럼)
• say(…).gist입력 에서 메소드를 호출하고 추가 줄 바꿈으로 인쇄합니다.

C, 53 바이트

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

파이썬 3 , 28 바이트

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

이 팁 에서 가져 왔습니다 . 나는 이것이 Windows에서 작동하지 않는다고 들었습니다.

온라인으로 사용해보십시오!

망막 , 11 7 바이트

마틴 엔더 덕분에 -4

.*
$*
1

온라인으로 사용해보십시오!

단항으로 변환 :

.*
$*

의 개수를 센다 1:

1

Brain-Flak , 20 바이트

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

온라인으로 사용해보십시오!

설명

이것은 채팅에서 Riley에 의해 만들어진 솔루션 의 골프 입니다. 그의 해결책은 다음과 같습니다.

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

Brain-Flak에 대해 잘 알고 있다면 설명이 필요 없습니다. 스택 높이를 푸시하고 카운트 다운 할 때 하나의 값을 팝하고 결국 모든 런의 합을 푸시합니다.

그것은 꽤 좋은 골프하지만 그는 모두를 제로로 {}하고 ([])그러나 이들 대신에 우리가 마스크를 제거하고 거의 상쇄해야 두 음 중 하나를 만들 그렇다면 하나만큼 다른 값을 가질 것이다.

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

그것들은 항상 하나마다 다르기 때문에 불행히도 우리의 답이 항상 스택 높이에 의해 벗어난 불행한 상황이 있습니다. 이를 해결하기 위해 첫 번째 스택 높이를 포함하도록 푸시 시작을 이동하면됩니다.

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

파이썬 2, 40 바이트

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

R, 11 바이트

sum(scan())

scan한 줄에 하나씩 숫자를 입력합니다. 그리고 sum, 합계.

펄 5 , 9 바이트

8 바이트의 코드 + -p플래그.

$\+=$_}{

온라인으로 사용해보십시오!

을 사용 -p하면 입력이 한 번에 한 줄씩 읽히고 $_매번 저장됩니다 . 우리는 사용 $\덕분에 있기 때문에, 누적으로 -p플래그가,이 암시 적으로 마지막에 인쇄입니다. 타의 추종을 불허이 }{때문에 사용되는 -p플래그는 인쇄 $\대신 인쇄의 말에 한 번 $_및 $\각 라인에서 그것은 일반적으로하는 것처럼 읽습니다.

순수 배쉬, 37 36 바이트

바이트에 대한 @KevinCruijssen에게 감사합니다!

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

온라인으로 사용해보십시오!

하스켈, 32 바이트

interact$show.sum.map read.lines

온라인으로 사용해보십시오! .

interactstdin에서 전체 입력을 수집하여 인수로 제공된 함수에 전달하고이 함수에서 가져온 문자열을 인쇄합니다. 기능은 다음과 같습니다

            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 바이트

<?=array_sum(file(t));

정수 목록을 가진 "t"라는 파일이 있다고 가정합니다.

file()파일을 열고 각 줄이 배열에 별도의 요소가 저장된 배열을 반환합니다. array_sum()배열의 모든 요소를 ​​합산합니다.

Awk, 19 바이트

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

설명:

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

dc , 14 바이트

0[+?z2=a]dsaxp

온라인으로 사용해보십시오!

설명:

 [      ] 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 바이트

q~]1b

온라인으로 사용해보십시오!

작동 원리

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.

파이썬, 38 30 바이트

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

파이썬에서는 파일이 open('filename')(분명히) 열립니다 . 그러나 반복 가능합니다. 파일을 반복 할 때마다 다음 줄이 나타납니다. 따라서 map은 각 목록을 반복하여 호출 int한 다음 결과 목록을 합산합니다.

파일 이름을 입력으로 호출하십시오. (즉 f('numbers.txt'))

map(int, open(n))목록 이해 대신 사용하여 8 바이트를 절약했습니다 . 원본 코드 :

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

매스 매 티카, 19 바이트

Mathematica의 노트북 환경을 가정합니다.

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

입력이 파일에있을 것으로 예상합니다 a.

젤리 , 9 8 바이트

ƈFпFỴVS

STDIN은 실제로 젤리가 아닙니다 ...

온라인으로 사용해보십시오!

작동 원리

ƈ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 바이트

ṇịᵐ+

온라인으로 사용해보십시오!

설명

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

순수한 배쉬, 30

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

온라인으로 사용해보십시오.

• read입력 파일을 한 번에 변수에 입력합니다 b. -d_말해 read줄 구분 기호입니다 _대신newline
• ${b//'newline'/+}개행을 b로 바꿉니다.+
• echo $[ ... ] 결과 식을 산술적으로 평가하여 출력합니다.

Vim, 16 바이트 / 키 스트로크

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

V는 이전 버전과 호환 되므로 온라인으로 사용해 볼 수 있습니다!

Pyth , 3 바이트

s.Q

온라인으로 사용해보십시오!

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

jq , 5 바이트

add, 명령 줄 플래그 -s.

예를 들면 다음과 같습니다.

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

실제로 2 바이트

kΣ

온라인으로 사용해보십시오!

설명:

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

이것은 예상보다 길어 보이지만 파일 끝에 도달하는 시점을 결정하기는 까다 롭습니다. 내가 생각할 수있는 유일한 방법은 ?명령 후 스택 길이를 확인하는 것 입니다.

온라인으로 사용해보십시오 .

[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

매크로 m는 재귀 적으로 호출됩니다. 현대 dc는 이런 종류의 일에 꼬리 재귀를 구현하므로 스택 오버플로에 대해 걱정할 필요가 없습니다.

파이크 , 4 바이트

zbrs

온라인으로 사용해보십시오!

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