Это простая задача: для заданной последовательности целых чисел найти сумму всех целых чисел в ней.

Но с изюминкой. Ваша оценка - это расстояние Левенштейна между вашим кодом и следующей фразой (вызов):

Учитывая набор целых чисел, найдите сумму всех целых чисел в нем.

Вы можете предположить, что на входе нет новых строк или завершающих пробелов.

Пример ввода / вывода:

Input: 1 5 -6 2 4 5
Output: 11
Input: 1 -2 10
Output: 9

Онлайн-калькулятор расстояния Левенштейна можно найти здесь: http://planetcalc.com/1721/

Питон, расстояние 3

#Given a set of integers, find the 
sum#of all integers in it.

Это дает встроенную функцию sum, которая может суммировать набор как sum({3,5,7})==17. Остальные части комментируются. Это расстояние 3 с 3 правками:

• Добавьте начальный #
• Добавить новую строку
• Заменить пробел после sumс#

Юлия, расстояние 27 26

Без комментариев!

Given(a)=(Set;of;integer; find; [sum(a),all,integer,in][1])

Это создает вызываемую функцию, Givenкоторая принимает массив и возвращает сумму его элементов. Поскольку многие встроенные объекты Julia имеют соответствующие имена (но не имеют отношения к вычислениям здесь), мы можем просто перечислить несколько разделенных точкой с запятой. Пока они не являются последними в списке, они не будут возвращены. Последняя часть фактически создает массив, содержащий сумму и три функции, и выбирает первый элемент, сумму.

APL, расстояние 6 3

Сохранено 3 расстояния ...? спасибо Денису!

+/⍝en a set of integers, find the sum of all integers in it.

Это суммирует данный массив ( +/). Остальная часть предложения добавляется в конец с помощью комментария ( ⍝).

GolfScript, 5

~{Given a set of integers+ find the sum of all integers in it}*

Это полная программа, которая не использует комментарии (но много noops).

Попробуйте онлайн в Web GolfScript .

R, расстояние 37 36 34

Без использования комментариев :)

 as.integer ( sum (scan(,integer( ) )))

Обратите внимание, что в начале есть пробел.

Mathematica, расстояние 17

Given a set of integers find the sum of all integers in it*0+Total@Input[]

Он не использует никаких комментариев или запретов, но вместо этого объявляет все слова как переменные, а затем избавляется от них путем умножения на ноль.

Он также имеет то преимущество, что является единственным ответом, который фактически принимает набор целых чисел в качестве входных данных.

Ввод {1,2,3}обеспечивает вывод, 6как ожидалось.

К сожалению, Sumфункция Mathematica не выполняет задачу в этом вопросе, поэтому требует большего количества байтов.

Ява - 43 41

Я пытался.

float a_set_of(int[] r){return IntStream.of(r).sum()}//n it.
Given a set of integers, find the sum of all integers in it.

Java: P.

RProgN , расстояние 2.

Given aset of integers, ;find the sum of all integers in it.

В RProgN a, set, find и sum - все команды. Все остальное по умолчанию игнорируется в синтаксисе. a помещает алфавит в стек, что приведет к сбою sum. Set никогда не имеет достаточно аргументов, поэтому всегда терпит неудачу, ошибочно. Find либо имеет неправильное количество аргументов, либо пытается сравнить алфавит со стеком ввода, что не работает.

a и set могут быть оба «исправлены», удалив пробел между ними, aset не является функцией, поэтому он игнорируется. Поиск просто имеет дополнительный символ, вставленный в начале, что также не распознается и игнорируется. Остается только сумма, которая удобно суммирует содержимое стека ввода.

Наконец, RProgN может что-то выиграть!

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

CJam, 7 6 5

{:+}e# a set of integers, find the sum of all integers in it.

Это анонимная функция, которая извлекает массив из стека и оставляет взамен целое число.

Спасибо @AboveFire за сокращение расстояния на 1.

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

Matlab, расстояние 29 28

Given_a_set_of_integers=@(findthe)sum(all(1)*findthe)

Без использования каких-либо комментариев :-)

Код находится в форме анонимной функции. Я предполагаю, что вход представляет собой вектор (1D-массив) чисел.

Пример:

>> Given_a_set_of_integers=@(findthe)sum(all(1)*findthe)
Given_a_set_of_integers = 
    @(findthe)sum(all(1)*findthe)

>> Given_a_set_of_integers([1 5 -6 2 4 5])
ans =
    11

О , 5

M] + o "Учитывая набор целых чисел, найдите сумму всех целых чисел в нем.

Числа должны быть в шестнадцатеричном и обратном отрицательном обозначении:

• -6 => 6_
• -4 => 4_
• -10 => А_

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

К 60 5

+/ / Given a set of integers, find the sum of all integers in it.

Я предполагаю, что символы НЕ подходят к расстоянию Леве, независимо от расстояния ...

Хахаха. Изначально у меня не было расстояния LeveXXX, поэтому я получил 60. Затем, благодаря полезным комментариям, он упал до 5.

F #, расстояние 21

let ``Given a set of integers, find the sum of all integers in it`` x = Seq.sum x

Должен любить возможность использовать двойные галочки, чтобы дать функции имя с пробелами в ней.

Использование:

[1;2;3] |> ``Given a set of integers, find the sum of all integers in it`` |> printfn "%i"

6

Пип, расстояние 3

Вступление в клуб тривиальных ответов «без комментариев-но-много-без-операций» ...

Given a set of integers, find the sum of all integers in $+g

GitHub хранилище для Pip

Код практически документирует сам себя; возможно s/in/using/для более точного описания. Целые числа, заданные в качестве аргументов командной строки, считываются в список g, который здесь складывается при сложении, а результат автоматически печатается. Большинство всего остального - просто переменные, которые не имеют значения.

Сначала я был немного удивлен тем, что это s, fработало без жалоб, поскольку fссылка на основную функцию и определение диапазона блока кода не имеют смысла. Но затем я понял: ,оператор диапазона, когда ему передается аргумент функции, просто создает другую функцию (как это делают многие операторы в Pip). Так что я думаю s, fоценивает {Given a set of integers, find the sum of all integers in " ",$+g}. (Который затем все равно сбрасывается.)

И последнее замечание: этот код работает с текущей версией Pip, в которой я еще ничего не назначил G. Если в какой-то будущей версии я сделаю Gбинарный или троичный оператор, тогда будет необходима версия с расстоянием 4. Использование givenвместо Givenбудет работать хорошо.

Haskell, расстояние 11

Без комментариев!

const sum"Given a set of integers, find the sum of all integers in it."

Использование:

> const sum"Given a set of integers, find the sum of all integers in it." $ [1..10]
55

Cubix , Расстояние 9

@ivOn a ;et I+ i?tegers, fu;d <he sum of all integers in it.

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

Это оборачивает на куб

      @ i v
      O n a
      ; e t
I + i ? t e g e r s , f
u ; d < h e s u m o f a
l l i n t e g e r s i n
      i t .
      . . .
      . . .

Оперативный код

• I+i Введите целое число, добавьте в TOS, затем введите символ
• ?Проверьте значение символа. Перенаправить влево для -1 (конец ввода) или вправо для чего-либо еще (0 не может быть введено)
  • ;O@ pop TOS, вывод суммы и выход
  • <;u перенаправить, всплыть TOS и разворот на начало

Пиф - 4

Просто помещает реальный код sQперед строкой, не опущенной пробелом.

sQ "Given a set of integers, find the sum of all integers in it.

Попробуйте это онлайн здесь .

PHP4.1, расстояние 25

Этот довольно длинный и очень поздно в бегах.

Но в любом случае, вот оно:

<?=$n_a_set_of_integers_fi=array_sum($f_all_integers_in_i);

Чтобы это работало, вам просто нужно передать массив через POST / GET / COOKIE / session, используя ключ f_all_integers_in_i.

Пыть , расстояние 1

Given a set of integers, find the Ʃum of all integers in it.

Все буквенно-цифровые символы в Pyt запрещены, а сумма списка занимает только один символ: Ʃ

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

С ++ 17, дистанция 44 29

Variadic Generic Lambda FTW

[](auto...t){return(t+...);}//the sum of all integers in it.

Предыдущее решение

template<class...t>int s(t...l){return(...+l);}//gers in it.

05AB1E, расстояние 3

#O,Given a set of integers, find the sum of all integers in it.

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

Пайк , счет 3

sK"Given a set of integers, find the sum of all integers in it.

Попробуй это здесь!

Ли , оценка 4

&+#Given a set of integers, find the sum of all integers in it.

Обратите внимание на завершающий символ новой строки.

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

Код довольно понятен. &+является оператором суммирования Ли, а #является комментарием. К сожалению, я должен включить завершающий перевод строки из-за того, что завершение программы строкой комментария «закомментирует» неявный вывод Ли, который на самом деле является ошибкой в ​​интерпретаторе, который я называю функцией.

дк, 14

?[+z1 <f]d  sf xp#egers, find the sum of all integers in it.

Комментарии:

?                   # read numbers
 [                  # start macro
  +                 # add up last two things on stack
   z1 <f            # if stack size is more than 1, execute macro at register 'f'
        ]           # end macro
         d          # dupe it
            sf      # saving one copy to register 'f'
               x    # and executing another
                p   # printing result

TIO

он жалуется на то, что стек пуст, если вы введете 1 число, но все еще работает, а удаление 0 сохраняет 2 разности.

Excel VBA, Расстояние: 11

Функция анонимного непосредственного окна VBE, которая берет входные данные из диапазона [a:a]объекта ActiveSheet и выводит их в непосредственное окно VBE

?[Sum(a:a)] 'f integers, find the sum of all integers in it.

Брейк-Флак , 20

(([]){[{}]{}([])}{})ers, find the sum of all integers in it.

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

объяснение

Поскольку в исходном тексте нет скобок, это сводится к код-гольфу проблеме в Brain-Flak. Но это все еще не делает этот ответ тривиальным, поскольку ответы в Brain-Flak редко бывают.

Первая интуиция, вероятно, будет следующим кодом

({{}})

Что работает ... если только в стеке нет нуля, в этом случае он просто суммирует до нуля. Чтобы обойти эту проблему, мы должны использовать высоту стека, чтобы убедиться, что стек не пуст. Это можно настроить так

([])    #{ Push stack height }
(       #{ Start Push }
{       #{ Loop until zero }
 <{}>   #{ Silently Pop the last height }
 {}     #{ Grab a value from the stack }
 <([])> #{ Silently push the stack height again }
}       #{ End loop }
{}      #{ Remove last stack height }
)       #{ Push the result }

Этот работает, но с ним что-то не так. Мы продолжаем заглушать трещины и толчки в петлях, но они почти равны, поэтому должен быть способ их отменить. Если мы попробуем

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

Мы заканчиваем nкаждый раз. Итак, вот фокус, у нас уже есть место n, мы просто перемещаем его в толчок, чтобы уравновесить ситуацию.

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

Впереди 17

>jLIve>   K+O @f integers, find the sum of all integers in it.
^ >j<l

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

Желе , расстояние: 2

Given a set of integers, find the sum of all integers in it.
S

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

Jelly оценивает только основную ссылку (последнюю строку), а явные команды запускают другие ссылки (другие строки).

Последняя строка имеет S, который суммирует входные данные.

Первая строка не выполняется, потому что в основной ссылке нет ссылки на нее.

Щелчок! 4.2.2.9 (+ Инструменты), синтаксис scratchblocks3, расстояние 35

Это функция. integers, find the sum of all inteэто вход.

for each(et)of(integers, find the sum of all inte
change[s v]by(et
end
report(s