Jestem szczerze zaskoczony, że jeszcze tego nie zrobiono. Jeśli możesz znaleźć istniejący wątek, oznacz go jako duplikat lub daj mi znać.

Wejście

Twój wkład ma postać dodatniej liczby całkowitej większej lub równej 1.

Wynik

Musisz wyprowadzić sumę wszystkich liczb całkowitych od 1 włącznie i liczby wejściowej.

Przykład

 In: 5
     1+2+3+4+5 = 15
Out: 15

OEIS A000217 - Liczby trójkątne: a (n) = dwumianowy (n + 1,2) = n (n + 1) / 2 = 0 + 1 + 2 + ... + n.

Tabela liderów

Uruchom poniższy fragment kodu, aby wyświetlić tabelę wyników dla odpowiedzi na to pytanie. (Podziękowania dla programmer5000 i steenbergh za zasugerowanie tego, a Martin Ender za jego utworzenie).

var QUESTION_ID=133109,OVERRIDE_USER=69148;function answersUrl(e){return"https://api.stackexchange.com/2.2/questions/"+QUESTION_ID+"/answers?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+ANSWER_FILTER}function commentUrl(e,s){return"https://api.stackexchange.com/2.2/answers/"+s.join(";")+"/comments?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+COMMENT_FILTER}function getAnswers(){jQuery.ajax({url:answersUrl(answer_page++),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){answers.push.apply(answers,e.items),answers_hash=[],answer_ids=[],e.items.forEach(function(e){e.comments=[];var s=+e.share_link.match(/\d+/);answer_ids.push(s),answers_hash[s]=e}),e.has_more||(more_answers=!1),comment_page=1,getComments()}})}function getComments(){jQuery.ajax({url:commentUrl(comment_page++,answer_ids),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){e.items.forEach(function(e){e.owner.user_id===OVERRIDE_USER&&answers_hash[e.post_id].comments.push(e)}),e.has_more?getComments():more_answers?getAnswers():process()}})}function getAuthorName(e){return e.owner.display_name}function process(){var e=[];answers.forEach(function(s){var r=s.body;s.comments.forEach(function(e){OVERRIDE_REG.test(e.body)&&(r="<h1>"+e.body.replace(OVERRIDE_REG,"")+"</h1>")});var a=r.match(SCORE_REG);a&&e.push({user:getAuthorName(s),size:+a[2],language:a[1],link:s.share_link})}),e.sort(function(e,s){var r=e.size,a=s.size;return r-a});var s={},r=1,a=null,n=1;e.forEach(function(e){e.size!=a&&(n=r),a=e.size,++r;var t=jQuery("#answer-template").html();t=t.replace("{{PLACE}}",n+".").replace("{{NAME}}",e.user).replace("{{LANGUAGE}}",e.language).replace("{{SIZE}}",e.size).replace("{{LINK}}",e.link),t=jQuery(t),jQuery("#answers").append(t);var o=e.language;/<a/.test(o)&&(o=jQuery(o).text()),s[o]=s[o]||{lang:e.language,user:e.user,size:e.size,link:e.link}});var t=[];for(var o in s)s.hasOwnProperty(o)&&t.push(s[o]);t.sort(function(e,s){return e.lang>s.lang?1:e.lang<s.lang?-1:0});for(var c=0;c<t.length;++c){var i=jQuery("#language-template").html(),o=t[c];i=i.replace("{{LANGUAGE}}",o.lang).replace("{{NAME}}",o.user).replace("{{SIZE}}",o.size).replace("{{LINK}}",o.link),i=jQuery(i),jQuery("#languages").append(i)}}var ANSWER_FILTER="!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe",COMMENT_FILTER="!)Q2B_A2kjfAiU78X(md6BoYk",answers=[],answers_hash,answer_ids,answer_page=1,more_answers=!0,comment_page;getAnswers();var SCORE_REG=/<h\d>\s*([^\n,]*[^\s,]),.*?(\d+)(?=[^\n\d<>]*(?:<(?:s>[^\n<>]*<\/s>|[^\n<>]+>)[^\n\d<>]*)*<\/h\d>)/,OVERRIDE_REG=/^Override\s*header:\s*/i;

body{text-align:left!important}#answer-list,#language-list{padding:10px;width:290px;float:left}table thead{font-weight:700}table td{padding:5px} /* font fix */ body {font-family: Arial,"Helvetica Neue",Helvetica,sans-serif;} /* #language-list x-pos fix */ #answer-list {margin-right: 200px;}

<script src="https://ajax.googleapis.com/ajax/libs/jquery/2.1.1/jquery.min.js"></script> <link rel="stylesheet" type="text/css" href="//cdn.sstatic.net/codegolf/all.css?v=83c949450c8b"> <div id="answer-list"> <h2>Leaderboard</h2> <table class="answer-list"> <thead> <tr><td></td><td>Author</td><td>Language</td><td>Size</td></tr></thead> <tbody id="answers"> </tbody> </table> </div><div id="language-list"> <h2>Winners by Language</h2> <table class="language-list"> <thead> <tr><td>Language</td><td>User</td><td>Score</td></tr></thead> <tbody id="languages"> </tbody> </table> </div><table style="display: none"> <tbody id="answer-template"> <tr><td>{{PLACE}}</td><td>{{NAME}}</td><td>{{LANGUAGE}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table> <table style="display: none"> <tbody id="language-template"> <tr><td>{{LANGUAGE}}</td><td>{{NAME}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table>

Pyth , 2 bajty

sS

Wypróbuj online! Domniemane dane wejściowe. Sjest 1-indeksowanym zakresem i sjest sumą.

Łuska , 1 bajt

Σ

Wypróbuj online!

Wbudowany! Σw Husk jest zwykle używany do uzyskania sumy wszystkich elementów listy, ale po zastosowaniu do liczby zwraca dokładnie n*(n+1)/2.

Piet , 161 bajtów / 16 kodów

Możesz zinterpretować go za pomocą tego tłumacza Piet lub załadować obraz na tej stronie i tam go uruchomić. Nie jestem pewien liczby bajtów, gdybym mógł ją zakodować inaczej, aby zmniejszyć rozmiar.

Skalowana wersja obrazu źródłowego:

Wyjaśnienie

highlightedTekst pokazuje aktualny stos (rosnącą od lewej do prawej), przy założeniu, że dane wejściowe użytkownika 5:

Wpisz liczbę i wepchnij ją na stos

5

Zduplikuj ten numer na stosie

5 5

Wciśnij 1 (rozmiar ciemnoczerwonego obszaru) na stos

5 5 1

Dodaj dwie najlepsze liczby

5 6

Pomnóż dwie pierwsze cyfry

30

Czarny obszar gwarantuje, że kursor przesunie się w prawo do jasnozielonego kodu. To przejście popycha 2 (rozmiar ciemnozielony) na stos

30 2

Podziel drugą liczbę na stosie przez pierwszą

15

Pop i wyślij najwyższy numer (interpretowany jako liczba)

[empty]

Po wstawieniu białego obszaru przejście jest nopczarne, pułapka na nasz kursor. To kończy wykonywanie programu.

Plik oryginalny (zdecydowanie za mały, aby go tutaj):

Brain-Flak , 16 bajtów

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

Wypróbuj online!

Jest to jedna z niewielu rzeczy, w których atak mózgu jest naprawdę dobry.

Ponieważ jest to jedna z najprostszych rzeczy, które można wykonać w przypadku uderzenia mózgu i ma ona dużą widoczność, oto szczegółowe wyjaśnienie:

# Push the sum of all of this code. In brain-flak, every snippet also returns a
# value, and all values inside the same brackets are summed
(
    # Loop and accumulate. Initially, this snippet return 0, but each time the
    # loop runs, the value of the code inside the loop is added to the result.
    {
        # Push (and also return)...
        (
            # The value on top of the stack
            {}

            # Plus the negative of...
            [
                # 1
                ()
            ]

        # The previous code pushes n-1 on to the stack and returns the value n-1
        )

        # 1
        # This code has no side effect, it just returns the value 1 each loop.
        # This effectively adds 1 to the accumulator
        ()

    # The loop will end once the value on top of the stack is 0
    }

    # Pop the zero off, which will also add 0 to the current value
    {}

# After the sum is pushed, the entire stack (which only contains the sum)
# will be implicitly printed.
)

Oaza , 3 bajty

n+0

Wypróbuj online!

Jak to działa

n+0
  0    a(0)=0
n+     a(n)=n+a(n-1)

Mathematica, 9 bajtów

#(#+1)/2&

Mathematica, 10 bajtów

(#^2+#)/2&

Mathematica, 11 bajtów

Tr@Range@#&

Mathematica, 12 bajtów

i~Sum~{i,#}&

Mathematica, 14 bajtów

(autor @ user71546)

1/2/Beta[#,2]&

Mathematica, 15 bajtów

Tr[#&~Array~#]&

Mathematica, 16 bajtów

Binomial[#+1,2]&

Mathematica, 17 bajtów

(autor @Not a tree)

⌊(2#+1)^2/8⌋&

Mathematica, 18 bajtów

PolygonalNumber@#&

Mathematica, 19 bajtów

#+#2&~Fold~Range@#&

Mathematica, 20 bajtów

(autor @Not a tree)

f@0=0;f@i_:=i+f[i-1]

JavaScript (ES6), 10 bajtów

n=>n*++n/2

Przykład

let f =

n=>n*++n/2

console.log(f(5))

język maszynowy x86_64 (Linux), 9 8 bajtów

0:   8d 47 01                lea    0x1(%rdi),%eax
3:   f7 ef                   imul   %edi
5:   d1 e8                   shr    %eax
7:   c3                      retq 

Aby Spróbuj online! skompiluj i uruchom następujący program C.

#include<stdio.h>
const char f[]="\x8d\x47\x01\xf7\xef\xd1\xe8\xc3";
int main(){
  for( int i = 1; i<=10; i++ ) {
    printf( "%d %d\n", i, ((int(*)())f)(i) );
  }
}

Dzięki @CodyGray i @Peter za -1.

Python 2 , 24 16 bajtów

-8 bajtów dzięki FryAmTheEggman.

lambda n:n*-~n/2

Wypróbuj online!

C # (.NET Core) , 10 bajtów

n=>n++*n/2

Wypróbuj online!

Java (OpenJDK 8) , 10 bajtów

n->n++*n/2

Wypróbuj online!

Oktawa , 22 19 bajtów

Ponieważ operacje arytmetyczne są nudne ...

@(n)nnz(triu(e(n)))

Wypróbuj online!

Wyjaśnienie

Biorąc pod uwagę n, tworzy to macierz nx nze wszystkimi wpisami równymi liczbie e ; dokonuje wpisów poniżej zera po przekątnej; i wyświetla liczbę niezerowych wartości.

Galaretka , 2 bajty

RS

Wypróbuj online!

Wyjaśnienie

RS

    implicit input
 S  sum of the...
R   inclusive range [1..input]
    implicit output

Suma Gaussa, 3 bajty

‘×H

Wyjaśnienie

‘×H

     implicit input
  H  half of the quantity of...
‘    input + 1...
 ×   times input
     implicit output

APL, 3 bajty

+/⍳

Wypróbuj online!

+/- suma (zmniejszenie +), ⍳- zakres.

Haskell , 13 bajtów

To jest najkrótsze (tak mi się wydaje ):

f n=sum[1..n]

Wypróbuj online!

Bezpośrednio, 17 13 bajtów

f n=n*(n+1)/2

Dzięki @WheatWizard za -4bajty!

Wypróbuj online!

Pointfree direct, 15 bajtów

(*)=<<(/2).(+1)

Dzięki @nimi za pomysł!

Wypróbuj online!

Pointfree via sum, 16 bajtów

sum.enumFromTo 1

Wypróbuj online!

Rekurencyjnie, 22 18 bajtów

f 0=0;f n=n+f(n-1)

Dzięki @maple_shaft za pomysł i @Laikoni za grę w golfa!

Wypróbuj online!

Standardowy fold, 19 bajtów

f n=foldr(+)0[1..n]

Wypróbuj online!

Gwiaździsta , 27 22 bajtów

5 bajtów zapisanych dzięki @miles !

, + +  **       +   *.

Wypróbuj online!

Wyjaśnienie

,             Read number (n) from STDIN and push it to the stack
 +            Duplicate top of the stack
 +            Duplicate top of the stack
  *           Pop two numbers and push their product (n*n)
*             Pop two numbers and push their sum (n+n*n)
       +      Push 2
   *          Pop two numbers and push their division ((n+n*n)/2)
.             Pop a number and print it to STDOUT

05AB1E , 2 bajty

LO

Wypróbuj online!

Jak to działa

     #input enters stack implicitly
L    #pop a, push list [1 .. a]
 O   #sum of the list
     #implicit output 

Suma Gaussa, 4 bajty

>¹*;

Wypróbuj online!

Jak to działa

>       #input + 1
 ¹*     #get original input & multiply
   ;    #divide by two 

Java (OpenJDK 8) , 10 bajtów

a->a++*a/2

Wypróbuj online!

Minęło trochę czasu na golfa, n->n*(n+1)/2bo jestem wolny.

Ale to nie jest prawdziwa odpowiedź w języku Java. To zdecydowanie za mało gadatliwe.

import java.util.stream.*;
a->IntStream.range(1,a+1).sum()

Nieźle, ale możemy zrobić lepiej.

import java.util.stream.*;
(Integer a)->Stream.iterate(1,(Integer b)->Math.incrementExact(b)).limit(a).reduce(0,Integer::sum)

Kocham Javę.

Sprawdź , 5 bajtów

:)*$p

Check nie jest nawet językiem golfowym, ale pokonuje CJam!

Wypróbuj online!

Wyjaśnienie:

Numer wejściowy jest umieszczany na stosie. :powiela to, aby dać n, n. Następnie zwiększa się ), dając n, n+1. *mnoży je razem, a następnie $dzieli wynik przez 2. pdrukuje wynik i program się kończy.

MATL , 2 bajty

:s

Wypróbuj online!

Nie szczęśliwa buźka.

Taxi , 687 bajtów

Go to Post Office:w 1 l 1 r 1 l.Pickup a passenger going to The Babelfishery.Go to The Babelfishery:s 1 l 1 r.Pickup a passenger going to Cyclone.Go to Cyclone:n 1 l 1 l 2 r.[a]Pickup a passenger going to Addition Alley.Pickup a passenger going to The Underground.Go to Zoom Zoom:n.Go to Addition Alley:w 1 l 1 r.Pickup a passenger going to Addition Alley.Go to The Underground:n 1 r 1 r.Switch to plan "z" if no one is waiting.Pickup a passenger going to Cyclone.Go to Cyclone:n 3 l 2 l.Switch to plan "a".[z]Go to Addition Alley:n 3 l 1 l.Pickup a passenger going to The Babelfishery.Go to The Babelfishery:n 1 r 1 r.Pickup a passenger going to Post Office.Go to Post Office:n 1 l 1 r.

Wypróbuj online!

Nie grał w golfa z komentarzami:

[ n = STDIN ]
Go to Post Office: west 1st left 1st right 1st left.
Pickup a passenger going to The Babelfishery.
Go to The Babelfishery: south 1st left 1st right.
Pickup a passenger going to Cyclone.
Go to Cyclone: north 1st left 1st left 2nd right.

[ for (i=n;i>1;i--) { T+=i } ]
[a]
Pickup a passenger going to Addition Alley.
Pickup a passenger going to The Underground.
Go to Zoom Zoom: north.
Go to Addition Alley: west 1st left 1st right.
Pickup a passenger going to Addition Alley.
Go to The Underground: north 1st right 1st right.
Switch to plan "z" if no one is waiting.
Pickup a passenger going to Cyclone.
Go to Cyclone: north 3rd left 2nd left.
Switch to plan "a".

[ print(T) ]
[z]
Go to Addition Alley: north 3rd left 1st left.
Pickup a passenger going to The Babelfishery.
Go to The Babelfishery: north 1st right 1st right.
Pickup a passenger going to Post Office.
Go to Post Office: north 1st left 1st right.

_{Jest o 22,6% mniej bajtów do zapętlenia niż do użycia x*(x+1)/2}

Julia, 10 bajtów

n->n*-~n/2

Wypróbuj online!

11 bajtów (działa również na Julii 0.4)

n->sum(1:n)

Wypróbuj online!

Brainfuck, 24 bajtów.

We / wy jest traktowane jako bajty.

,[[->+>+<<]>[-<+>]<-]>>.

Wyjaśniono

,[[->+>+<<]>[-<+>]<-]>>.
,                           # Read a byte from STDIN
 [                  ]       # Main loop, counting down all values from n to 1
  [->+>+<<]                 # Copy the i value to *i+1 and *i+2
           >[-<+>]          # Move *i+1 back to i
                  <-        # Move back to i, lower it by one. Because *i+2 is never reset, each iteration adds the value of i to it.
                     >>.    # Output the value of *i+2

,,,, 6 bajtów

:1+×2÷

Wyjaśnienie

:1+×2÷

:       ### duplicate
 1+     ### add 1
   ×    ### multiply
    2÷  ### divide by 2

Jeśli wkrótce wprowadzę zakres ...

rΣ

Siatkówka , 13 bajtów

.+
$*
1
$`1
1

Wypróbuj online! Objaśnienie: Pierwszy i ostatni etap są po prostu jednostronnym przeliczeniem dziesiętnym. Środkowy etap zastępuje każdy 1liczbą 1s po lewej stronie plus drugą 1dla 1siebie, licząc w ten sposób od 1do n, sumując wartości pośrednio.

> <> , 7 + 3 = 10 bajtów

Oblicza n (n + 1) / 2 .
Dodano 3 bajty dla flagi -v

:1+2,*n

Wypróbuj online!

Lub jeśli dane wejściowe można traktować jako kod znakowy:

> <> , 9 bajtów

i:1+2,*n;

Wypróbuj online!

dc , 7 bajtów

d1+*2/p

LUB

d2^+2/p

LUB

dd*+2/p

Wypróbuj online!

PHP, 19 bajtów

<?=$argn*-~$argn/2;
<?=$argn/2*++$argn;
<?=$argn*++$argn/2; # this one fails

przy użyciu wbudowanych 29 bajtów:

<?=array_sum(range(1,$argn));

pętla, 31 bajtów:

while($argn)$s+=$argn--;echo$s;

Cubix , 12 10 bajtów

*,)2I://O@

Początkowa wersja

....I:)*2,O@

Wypróbuj online!

Wyjaśnienie

Kod rozwinięty do kostki wygląda następująco:

    * ,
    ) 2
I : / / O @ . .
. . . . . . . .
    . .
    . .

Wskaźnik instrukcji (IP) zaczyna się od I, poruszając się na wschód. Kontynuuje ruch na wschód, aż natrafi na /lustro, które odbija je na północ. Gdy adres IP osiąga szczyt kodu, zawija się do ostatniego .w trzeciej linii, przesuwając się na południe. Następnie zawija się do przedostatniego .na ostatniej linii, przesuwając się na północ. Następnie ponownie dociera do /lustra, które odbija je na wschód, tylko dla następnego /odbicia go ponownie na północ. Tym razem IP zawija się w przedostatni .w trzeciej linii, a następnie .w ostatniej linii.

Instrukcje są wykonywane w następującej kolejności.

I:)*2,O@ # Explanation
I        # Take input as an integer and push it to the stack
 :       # Duplicate the input
  )      # Increment one of the inputs
   *     # Multiply the input by input+1
    2    # Push 2 to the stack
     ,   # Integer devide the multiplication result by 2
      O  # Output the result
       @ # End program

Kod maszynowy x86-64, 7 bajtów

31 C0
01 C8
E2 FC
C3  

Powyższe bajty definiują funkcję, która akceptuje pojedynczy parametr ni zwraca wartość zawierającą sumę wszystkich liczb całkowitych od 1 do n.

Jest zapisywany do konwencji wywoływania Microsoft x64 , która przekazuje parametr do ECXrejestru. Zwracana jest wartość EAX, podobnie jak wszystkie konwencje wywoływania x86 / x86-64.

Mnemoniki do montażu bez golfa:

       xor  eax, eax    ; zero out EAX
Next:  add  eax, ecx    ; add ECX to EAX
       loop Next        ; decrement ECX by 1, and loop as long as ECX != 0
       ret              ; return, with result in EAX

Wypróbuj online!
_{(Wywołanie funkcji C tam jest opatrzone adnotacją, która powoduje, że GCC wywołuje ją przy użyciu konwencji wywoływania Microsoft, której używa mój kod zestawu. Gdyby TIO dostarczyło MSVC, nie byłoby to konieczne).}

Zgodnie z nietypowymi standardami golfa kodowego widać, że to iteracyjne podejście do zapętlania jest lepsze niż podejście, które wykorzystuje bardziej rozsądną formułę matematyczną ( n(n+1) / 2), nawet jeśli jest oczywiście znacznie mniej wydajne pod względem prędkości działania.

Stosując teorię liczb, implementacja pułapu nadal może zostać pobita o jeden bajt. Każda z tych instrukcji jest niezbędna, ale istnieje nieco krótsze kodowanie, IMULktóre używa EAX domyślnie jako operandu docelowego (faktycznie używa EDX:EAX, ale możemy po prostu zignorować górne 32 bity wyniku). To tylko 2 bajty do zakodowania, w porównaniu z 3.

LEAzajmuje również trzy bajty, ale tak naprawdę nie można tego obejść, ponieważ musimy zwiększyć wartość , zachowując pierwotną wartość. Gdybyśmy zrobili a, MOVaby zrobić kopię INC, mielibyśmy 4 bajty. (W x86-32, gdzie INCjest tylko 1 bajt, mielibyśmy te same 3 bajty, co LEA.)

Ostateczne przesunięcie w prawo jest konieczne, aby podzielić wynik na pół i jest z pewnością bardziej zwarte (i bardziej wydajne) niż mnożenie. Jednak kod powinien naprawdę używać shrzamiast sar, ponieważ przy założeniu, że wartość wejściowa n, jest liczbą całkowitą bez znaku . (To założenie jest oczywiście zgodne z regułami, ale jeśli wiesz, że dane wejściowe są niepodpisane, to nie powinieneś robić podpisanej zmiany arytmetycznej, ponieważ górny bit ustawiony w dużej wartości bez znaku spowoduje wynik być niepoprawnym).

8D 41 01                lea    eax, [rcx+1]
F7 E9                   imul   ecx
D1 E8                   shr    eax, 1
C3                      ret

Teraz tylko 8 bajtów (dzięki Peter Cordes). Mimo to 8> 7.