Я искренне удивлен, что это еще не было сделано. Если вы можете найти существующую тему, обязательно отметьте ее как дубликат или дайте мне знать.

вход

Ваш ввод в виде любого положительного целого числа, большего или равного 1.

Выход

Вы должны вывести сумму всех целых чисел от 1 до числа, включая число.

пример

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

OEIS A000217 - Треугольные числа: a (n) = биномиальное (n + 1,2) = n (n + 1) / 2 = 0 + 1 + 2 + ... + n.

Leaderboard

Запустите фрагмент кода ниже, чтобы просмотреть список лидеров для ответов на этот вопрос. (Спасибо programmer5000 и steenbergh за предложение, и Martin Ender за его создание.)

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 байта

sS

Попробуйте онлайн! Неявный ввод. S1-индексированный диапазон и sявляется суммой.

Шелуха , 1 байт

Σ

Попробуйте онлайн!

Builtin! Σв Husk обычно используется для получения суммы всех элементов списка, но применительно к числу он возвращает точно n*(n+1)/2.

Пит , 161 байт / 16 кодов

Вы можете интерпретировать его с помощью этого интерпретатора Piet или загрузить изображение на этот веб-сайт и запустить его там. Не уверен насчет количества байтов, могу ли я по-другому его кодировать, чтобы уменьшить размер.

Уменьшенная версия исходного изображения:

объяснение

В highlightedтексте показывает текущий стек (выращивание слева направо), предполагая , пользовательский ввод 5:

Введите число и поместите его в стек

5

Дублируйте этот номер в стеке

5 5

Нажмите 1 (размер темно-красной области) на стек

5 5 1

Добавьте два верхних числа

5 6

Умножьте два верхних числа

30

Черная область гарантирует, что курсор перемещается вниз прямо к светло-зеленому коделю. Этот переход толкает 2 (размер темно-зеленый) на стек

30 2

Разделите второе число в стеке на первое

15

Выскочить и вывести верхнее число (интерпретируется как число)

[empty]

Вставляя белую область, мы получаем переход nop, черный захватывает наш курсор. Это завершает выполнение программы.

Исходный файл (здесь слишком маленький):

Brain-Flak , 16 байтов

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

Попробуйте онлайн!

Это одна из немногих вещей, в которых умственные способности действительно хороши.

Так как это одна из самых простых вещей, которую вы можете сделать в мозговом духе, и она имеет много наглядности, вот подробное объяснение:

# 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.
)

Оазис , 3 байта

n+0

Попробуйте онлайн!

Как это устроено

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

Mathematica, 9 байт

#(#+1)/2&

Mathematica, 10 байт

(#^2+#)/2&

Mathematica, 11 байт

Tr@Range@#&

Mathematica, 12 байт

i~Sum~{i,#}&

Mathematica, 14 байтов

(@ user71546)

1/2/Beta[#,2]&

Mathematica, 15 байт

Tr[#&~Array~#]&

Mathematica, 16 байтов

Binomial[#+1,2]&

Mathematica, 17 байт

(не @ деревом)

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

Mathematica, 18 байт

PolygonalNumber@#&

Mathematica, 19 байт

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

Mathematica, 20 байтов

(не @ деревом)

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

JavaScript (ES6), 10 байт

n=>n*++n/2

пример

let f =

n=>n*++n/2

console.log(f(5))

машинный язык x86_64 (Linux), 9 8 байт

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

Для того, чтобы попробовать его в Интернете! скомпилируйте и запустите следующую 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) );
  }
}

Спасибо @CodyGray и @Peter за -1.

Python 2 , 24 16 байт

-8 байт благодаря FryAmTheEggman.

lambda n:n*-~n/2

Попробуйте онлайн!

C # (.NET Core) , 10 байт

n=>n++*n/2

Попробуйте онлайн!

Java (OpenJDK 8) , 10 байт

n->n++*n/2

Попробуйте онлайн!

Октава , 22 19 байт

Потому что арифметические операции скучны ...

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

Попробуйте онлайн!

объяснение

Учитывая n, это создает n× nматрицу со всеми записями, равными числу e ; делает записи ниже диагонали ноль; и выводит количество ненулевых значений.

Желе , 2 байта

RS

Попробуйте онлайн!

объяснение

RS

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

Сумма Гаусса, 3 байта

‘×H

объяснение

‘×H

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

APL, 3 байта

+/⍳

Попробуйте онлайн!

+/- сумма (уменьшение +), ⍳- диапазон.

Haskell , 13 байт

Это самое короткое ( думаю, подумалось):

f n=sum[1..n]

Попробуйте онлайн!

Direct, 17 13 байтов

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

Спасибо @WheatWizard за -4байты!

Попробуйте онлайн!

Pointfree direct, 15 байт

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

Спасибо @nimi за идею!

Попробуйте онлайн!

Pointfree via sum, 16 байтов

sum.enumFromTo 1

Попробуйте онлайн!

Рекурсивно, 22- 18 байт

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

Спасибо @maple_shaft за идею и @Laikoni за игру в гольф!

Попробуйте онлайн!

Стандарт fold, 19 байт

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

Попробуйте онлайн!

Звездный , 27 22 байта

5 байтов сэкономлено благодаря @miles !

, + +  **       +   *.

Попробуйте онлайн!

объяснение

,             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 байта

LO

Попробуйте онлайн!

Как это устроено

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

Сумма Гаусса, 4 байта

>¹*;

Попробуйте онлайн!

Как это устроено

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

Java (OpenJDK 8) , 10 байт

a->a++*a/2

Попробуйте онлайн!

Потребовалось время, чтобы начать играть в гольф, n->n*(n+1)/2потому что я медленный.

Но это не настоящий ответ Java. Это определенно недостаточно многословно.

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

Неплохо, но мы можем добиться большего.

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

Я люблю Яву.

Проверьте , 5 байтов

:)*$p

Чек даже не является языком игры в гольф, но все же превосходит CJam!

Попробуйте онлайн!

Объяснение:

Введенный номер помещается в стек. :дублирует это, чтобы дать n, n. Затем увеличивается с ), давая n, n+1. *умножает их вместе, а затем $делит результат на 2. pпечатает результат, и программа завершается.

MATL , 2 байта

:s

Попробуйте онлайн!

Не счастливый смайлик.

Такси , 687 байтов

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.

Попробуйте онлайн!

Без гольфа с комментариями:

[ 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.

_{Это на 22,6% меньше байтов, чем нужно использовать x*(x+1)/2}

Юлия, 10 байт

n->n*-~n/2

Попробуйте онлайн!

11 байт (работает также на Julia 0.4)

n->sum(1:n)

Попробуйте онлайн!

Brainfuck, 24 байта.

Ввод / вывод обрабатывается как байты.

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

Разъяснения

,[[->+>+<<]>[-<+>]<-]>>.
,                           # 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 байт

:1+×2÷

объяснение

:1+×2÷

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

Если я реализую диапазон в ближайшее время ...

rΣ

Сетчатка , 13 байт

.+
$*
1
$`1
1

Попробуйте онлайн! Пояснение: Первый и последний этапы - это просто одинарное ⇔ десятичное преобразование. Средняя ступень заменяет каждую 1на число 1s слева от нее плюс другую 1для самого 1себя, таким образом, считая от 1до n, суммируя значения неявно.

> <> , 7 + 3 = 10 байт

Вычисляет n (n + 1) / 2 .
3 байта добавлены для флага -v

:1+2,*n

Попробуйте онлайн!

Или, если ввод может быть принят как код символа:

> <> , 9 байт

i:1+2,*n;

Попробуйте онлайн!

постоянный ток , 7 байтов

d1+*2/p

ИЛИ ЖЕ

d2^+2/p

ИЛИ ЖЕ

dd*+2/p

Попробуйте онлайн!

PHP, 19 байт

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

используя встроенные функции, 29 байт:

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

цикл, 31 байт:

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

Cubix , 12 10 байт

*,)2I://O@

Первоначальный вариант

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

Попробуйте онлайн!

объяснение

Развернутый на куб код выглядит так:

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

Указатель инструкций (IP) начинается с I, двигаясь на восток. Он продолжает двигаться на восток, пока не наткнется на /зеркало, которое отражает его на север. Когда IP достигает вершины кода, он .переходит к последнему на третьей строке, двигаясь на юг. Затем он подходит к предпоследней .на последней линии, двигаясь на север. Затем он /снова достигает зеркала, которое отражает его на восток, только для следующего, /чтобы снова отразить его на север. На этот раз IP переходит к предпоследней .в третьей строке, а затем к последней .в последней строке.

Инструкции выполняются в следующем порядке.

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

Машинный код x86-64, 7 байт

31 C0
01 C8
E2 FC
C3  

Вышеуказанные байты определяют функцию, которая принимает один параметр nи возвращает значение, содержащее сумму всех целых чисел от 1 до n.

Он записывается в соглашение о вызовах Microsoft x64 , которое передает параметр в ECXрегистр. Возвращаемое значение сохраняется EAX, как и все соглашения о вызовах x86 / x86-64.

Неуправляемая сборка мнемоники:

       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

Попробуйте онлайн!
_{(Вызов функции C там помечен атрибутом, который заставляет GCC вызывать его, используя соглашение о вызовах Microsoft, которое использует мой ассемблерный код. Если бы TIO предоставил MSVC, в этом не было бы необходимости.)}

По необычным стандартам кода гольфа вы видите, что этот итеративный циклический подход предпочтительнее подходов, использующих более разумную математическую формулу ( n(n+1) / 2), хотя он, очевидно, значительно менее эффективен с точки зрения скорости выполнения.

Используя теорию чисел, реализация потолочной системы все еще может быть побита одним байтом. Каждая из этих инструкций важна, но есть немного более короткая кодировка, в IMULкоторой EAX неявно используется операнд-адресат (фактически, он использует EDX:EAX, но мы можем просто игнорировать старшие 32 бита результата). Это только 2 байта для кодирования, по сравнению с 3.

LEAтакже занимает три байта, но на самом деле нет никакого способа обойти это, потому что нам нужно увеличивать при сохранении исходного значения. Если бы мы сделали MOVкопию, то INCу нас было бы 4 байта. (В x86-32, где INCтолько 1 байт, мы будем с теми же 3 байтами, что и LEA.)

Окончательное смещение вправо необходимо, чтобы разделить результат пополам, и оно, безусловно, более компактно (и более эффективно), чем умножение. Однако код должен действительно использоваться shrвместо sar, поскольку предполагается, что входное значение nявляется целым числом без знака . (Конечно, это допущение является действительным в соответствии с правилами, но если вы знаете, что входные данные являются беззнаковыми, то вам не следует делать арифметическое смещение со знаком, поскольку старший бит, установленный в большом значении без знака, приведет к результату. быть неверным.)

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

Сейчас всего 8 байтов (спасибо Петру Кордесу). Тем не менее, 8> 7.