Biorąc pod uwagę dodatnią liczbę całkowitą n jako dane wejściowe, wypisuje sumę odwróconego zakresu n.

Odwrócona suma zakresu jest tworzona przez utworzenie przedziału obejmującego do n, zaczynając od 1 i włączając n, odwrócenie każdej liczby w środku i zsumowanie jej.

Przykład:

Oto, co stałoby się dla wejścia 10:

Zasięg: [1,2,3,4,5,6,7,8,9,10]

Odwrotny: [1,2,3,4,5,6,7,8,9,01](1-znakowe liczby są odwrócone, 10 odwróconych to 01 lub 1)

Suma: 46

Liczby z 3+ cyframi są odwracane w taki sam sposób, jak cyfry z 2 cyframi. Na przykład 1234 stałby się 4321.

Przypadki testowe:

Input -> Output

10 -> 46
5 -> 15
21 -> 519
58 -> 2350
75 -> 3147
999 -> 454545

Kompletne przypadki tekstowe do wprowadzenia 999 można znaleźć tutaj , bardzo dzięki @ fireflame241.

05AB1E , 3 bajty

Kod

LíO

Wykorzystuje kodowanie 05AB1E . Wypróbuj online!

Wyjaśnienie

L       # Range
 í      # Reverse
  O     # Sum

Narzędzia Bash + GNU, 24

seq $1|rev|paste -sd+|bc

Wypróbuj online .

Wyjaśnienie

seq $1                    # range
      |rev                # reverse (each line)
          |paste -sd+|bc  # sum

JavaScript (ES6), 42 bajty

f=n=>n&&+[...n+""].reverse().join``+f(n-1)

Moje ulubione podwójnie rekurencyjne rozwiązanie jest niestety o 3 bajty dłuższe:

f=n=>n&&+(g=x=>x?x%10+g(x/10|0):"")(n)+f(n-1)

Perl 6 , 20 bajtów

{(1..$_)».flip.sum}

Sprawdź to

Rozszerzony:

{
   ( 1 .. $_ )\  # Range
   ».flip        # flip each value in the Range (possibly in parallel)
   .sum          # sum up the list
}

Retina , 41 36 35 bajtów

.+
$*
1
1$`¶
1+
$.&
%O^$`.

.+
$*
1

Wypróbuj online! Link zawiera przypadki testowe. Edycja: Zapisano 5 bajtów dzięki @FryAmTheEggman. Zapisano 1 bajt dzięki @ PunPun1000. Wyjaśnienie:

.+
$*

Konwertuj na unary.

1
1$`¶

Utwórz zakres od 1do n.

1+
$.&

Konwertuj z powrotem na dziesiętne.

%O^$`.

Odwróć każdą liczbę.

.+
$*

Konwertuj z powrotem na jednoargumentowy.

1

Suma i przelicz z powrotem na dziesiętne.

Galaretka , 4 bajty

Ṛ€ḌS

Wypróbuj online!

W jaki sposób?

Ṛ€ḌS - Link: n
Ṛ€   - reverse for €ach (in implicit range)
  Ḍ  - convert from decimal list (vectorises)
   S - sum

Haskell, 34 bajty

\n->sum$read.reverse.show<$>[1..n]

Prosty i bezpośredni.

C (gcc) , 63 bajty

f(n){int t=0,c=n;for(;c;c/=10)t=t*10+c%10;return n?t+f(n-1):0;}

Wypróbuj online!

cQuents , 4 bajty

;\r$

Wypróbuj online!

Wyjaśnienie

       Implicit input n.
;      Series mode. Outputs the sum of the sequence from 1 to n.
 \r$   Each item in the sequence equals:
 \r    String reverse of
   $                     current index (1-based)

Python 2 , 38 bajtów

Nie można obliczyć warunków wyższych niż limit rekurencji:

f=lambda x:x and int(`x`[::-1])+f(x-1)

Wypróbuj online!

Brachylog , 4 bajty

⟦↔ᵐ+

Wypróbuj online!

Wyjaśnienie

⟦↔ᵐ+
⟦        range from 0 to input
 ↔ᵐ      map reverse
   +     sum

Röda , 56 41 36 bajtów

15 bajtów zapisanych dzięki @fergusq

{seq 1,_|parseInteger`$_`[::-1]|sum}

Wypróbuj online!

Jest to anonimowa funkcja, która pobiera liczbę całkowitą ze strumienia wejściowego i wyprowadza liczbę całkowitą do strumienia wyjściowego.

Wyjaśnienie

{seq 1,_|parseInteger`$_`[::-1]|sum} Anonymous function
 seq 1,_                             Create a sequence 1 2 3 .. input and push each value to the stream
        |                            For each value in the stream:
                     `$_`             Cast it into a string
                         [::-1]       And reverse it
         parseInteger                 And parse the resulting string as an integer, while pushing the value to the stream
                               |sum  Sum all the values in the stream

C # (.NET Core) , 103 97 bajtów

using System.Linq;r=>new int[r+1].Select((_,n)=>int.Parse(string.Concat((n+"").Reverse()))).Sum()

Wypróbuj online!

Link TIO wyświetla wszystkie wyniki od 1 do 999, więc nie krępuj się sprawdzić moją pracę.

Spodziewałem się, że będzie to nieco krótsze, ale okazuje się Reverse() zwraca IEnumerable<char>zamiast innego ciągu, więc musiałem dodać trochę więcej, aby przekształcić go z powrotem w ciąg, aby móc go przeanalizować jako wartość całkowitą. Może jest krótsza droga do przejścia od IEnumerable<char>int do poprawnie.

Co ważne, wykorzystuje to również funkcje Range() Reverse() i Sum()wszystko w porządku.

-6 bajtów dzięki TheLethalCoder

Rubin, 56, 52, 41, 39 bajtów

->n{(1..n).sum{|i|i.to_s.reverse.to_i}}

Ruby, 34 bajty (jeśli parametr lambda jest ciągiem)

->n{(1..n).sum{|i|i.reverse.to_i}}

Dzięki @Unihedron za drugie rozwiązanie.

Mathematica, 47 bajtów

Tr[FromDigits@*Reverse/@IntegerDigits@Range@#]&

Wypróbuj online! (aby pracować z matematyką, musimy zamienić „Tr” na „Total”)

Węgiel drzewny , 14 13 bajtów

-1 bajt dzięki Carlos Alejo

Ｉ∕…·⁰Ｎ«⁺ιＩ⮌Ｉκ

Wypróbuj online! Link jest do pełnej wersji.

Wyjaśnienie

Ｉ                  Cast
  ∕     «           Reduce
   …·⁰Ｎ            Inclusive range from 0 to input as number
         ⁺          Plus
          ι         i
           Ｉ⮌Ｉκ   Cast(Reverse(Cast(k)))

Magneson , 102 bajty

To nie jest bardzo widoczne, więc oto wersja przeskalowana (uwaga: tak naprawdę nie będzie działać i nadal nie jest ładna)

Magneson działa poprzez parsowanie obrazu i ocenę poleceń na podstawie kolorów czytanych pikseli. Dlatego przechodząc przez obraz tego wyzwania, mamy:

• R: 0, G: 1, B: 1to komenda przypisania liczb całkowitych, która pobiera ciąg nazwy zmiennej i wartości do przypisania. Użyjemy tego do przechowywania łącznej sumy.
• R: 0, G: 1, B: 0jest wstępnie zbudowanym ciągiem o wartości VAR_1(Uwaga: dzieje się tak tylko wtedy, gdy prosimy o ciąg; kod koloru ma osobną funkcję, gdy jest używany gdzie indziej).
• R: 3, G: 0, B: 0jest liczbą surową. Magneson obsługuje standardowe liczby, wymagając, aby czerwony składnik miał dokładnie 3, a następnie tworzy liczbę, używając bezpośrednio niebieskiej wartości plus zielonej wartości pomnożonej przez 256. W tym przypadku otrzymujemy tylko liczbę 0.
• R: 0, G: 1, B: 1to kolejne polecenie przypisania liczb całkowitych. Tym razem przechowujemy zmienną iteracyjną, aby śledzić, na jakiej liczbie się znajdujemy
• R: 0, G: 1, B: 1jest wstępnie zbudowanym ciągiem o wartości VAR_2(Raz jeszcze, tylko gdy potrzebujemy ciągu)
• R: 3, G: 0, B: 0jest jeszcze raz liczbą 0. Na interesujące kawałki teraz.
• R: 1, G: 0, B: 0wskazuje początek pętli. Pobiera to liczbę i wielokrotnie zapętla następujący fragment kodu.
• R: 2, G: 0, B: 0jest funkcją STDIN, a przynajmniej wtedy, gdy potrzebujemy liczby. Odczytuje wiersz danych wejściowych z konsoli i zamienia go na liczbę, ponieważ poprosiliśmy o liczbę.
• R: 0, G: 8, B: 0uruchamia nasz kod pętli i jest to polecenie addytywne. Dodaje to liczbę do zmiennej całkowitej, a zatem pobiera ciąg nazwy zmiennej i liczbę do dodania.
• R: 0, G: 1, B: 1to wstępnie zbudowany ciąg VAR_2, który jest naszą zmienną iteracyjną.
• R: 3, G: 0, B: 1 jest liczbą surową, ale tym razem jest to liczba 1.
• R: 0, G: 8, B: 0 to kolejne polecenie dodawania.
• R: 0, G: 1, B: 0jest ciągiem VAR_1, który jest naszą sumą całkowitą.
• R: 0, G: 3, B: 0to funkcja odwracająca ciąg. W kontekście pytania o liczbę, następnie konwertuje odwrócony ciąg na liczbę.
• R: 0, G: 2, B: 1to komenda pobierania liczb całkowitych, która pobierze liczbę zapisaną w podanej zmiennej. W kontekście pytania o ciąg znaków (na przykład z polecenia odwrotnego) konwertuje liczbę na ciąg znaków.
• R: 0, G: 1, B: 1to imię VAR_2; nasza zmienna iteracyjna.
• R: 1, G: 0, B: 1jest znacznikiem kończącym pętlę i wracającym do początku pętli, jeśli kryteria nie są spełnione (więc jeśli musimy kontynuować pętlę). W przeciwnym razie przejdź dalej.
• R: 0, G: 0, B: 1 jest bardzo prostym poleceniem println i pobiera ciąg znaków.
• R: 0, G: 2, B: 1 pobiera liczbę całkowitą ze zmiennej

• R: 0, G: 1, B: 0 to nazwa naszej zmiennej sumarycznej, VAR_1

  Podsumowując, program:

• Przypisuje wartość 0 do VAR_1iVAR_2
• Pętle od 0 do liczby podanej w STDIN
  • Dodaje jeden do VAR_2
  • Dodaje całkowitą wartość cofania VAR_2doVAR_1
• Drukuje zawartość VAR_1

Python 2 , 50 47 bajtów

-3 bajty dzięki oficjalnemu!

lambda n:sum(int(`i+1`[::-1])for i in range(n))

Wypróbuj online!

CJam , 12 bajtów

ri){sW%i}%:+

Wypróbuj online!

-1 dzięki Business Cat .

Wyjaśnienie:

ri){sW%i}%:+
r            Get token
 i           To integer
  )          Increment
   {sW%i}    Push {sW%i}
    s         To string
     W        Push -1
      %       Step
       i      To integer
         %   Map
          :+ Map/reduce by Add

APL (Dyalog) , 10 7 bajtów

3 bajty w golfa dzięki @ Adám, przechodząc na tradfn z pociągu

+/⍎⌽⍕⍳⎕

Wypróbuj online!

⎕          Input (example input: 10)
⍳          Range; 1 2 3 4 5 6 7 8 9 10
⍕          Stringify; '1 2 3 4 5 6 7 8 9 10'
⌽          Reverse; '01 9 8 7 6 5 4 3 2 1'
⍎          Evaluate; 1 9 8 7 6 5 4 3 2 1
+/         Sum; 46

Java 8, 97 bajtów

IntStream.range(1,n+1).map(i->Integer.valueOf(new StringBuffer(""+i).reverse().toString())).sum()

EDYTOWAĆ

Zgodnie z komentarzem Kevin Cruijssenchciałbym poprawić swoją odpowiedź.

Java 8, 103 bajty

n->java.util.stream.LongStream.range(1,n+1).map(i->new Long(new StringBuffer(""+i).reverse()+"")).sum()

Japt , 7 5 bajtów

-2 bajty dzięki @Shaggy.

õs xw

Wypróbuj online!

Wyjaśnienie

õs xw  Implicit input of integer U
õs     Create range [1,U] and map to strings
    w  Reverse each string
   x   Sum the array, implicitly converting to numbers.

Stare rozwiązanie, 7 bajtów

Zachowuję to, ponieważ jest to naprawdę fajne zastosowanie z2.

õs z2 x

Wypróbuj online!

Wyjaśnienie

õs z2 x  Implicit input of integer U
õs       Create range [1,U] and map to strings
   z2    Rotate the array 180°, reversing strings
      x  Sum the array, implicitly converting back to integers

C ++, 146 bajtów

#include<string>
using namespace std;int r(int i){int v=0,j=0;for(;j<=i;++j){auto t=to_string(j);reverse(t.begin(),t.end());v+=stoi(t);}return v;}

Łuska , 7 6 3 bajtów

ṁ↔ḣ

Wypróbuj online!

Niegolfowane / Wyjaśnienie

  ḣ  -- With the list [1..N] ..
ṁ    -- .. do the following with each element and sum the values:
 ↔   --    reverse it

Perl 5 , 29 27 22 + 1 ( -p) = 23 bajty

map$\+=reverse,1..$_}{

Wypróbuj online!

RProgN 2 , 8 bajtów

{Ø.in}S+

Wyjaśnił

{Ø.in}S+
{    }S # Create a stack in range 0 through the implicit input, using the function defined
 Ø.     # Append nothing, stringifying the number
   i    # Reverse the string
    n   # Convert back to a number
       +# Get the sum of the stack, and output implicitly.

Wypróbuj online!

Pyth , 8 6 bajtów

^{-2 bajty dzięki FryAmTheEggman!}

sms_`h

Wypróbuj online!

Tcl , 66 bajtów

time {incr s [regsub ^0+ [string rev $n] ""];incr n -1} $n
puts $s

Wypróbuj online!

Neim , 4 bajty

Δ𝐫)𝐬

Wypróbuj online!

Wyjaśnienie

Δ )              for each element 1 to n (outputs list)
 𝐫               reverse 
   𝐬             sum 

C (gcc) , 71 bajtów

q(n,x,p){p=n?q(n/10,x*10+n%10):x;}f(w,a,e){for(a=0;w;)a+=q(w--,0);e=a;}

Wypróbuj online!