รับจำนวนเต็มบวก n เป็นอินพุทเอาท์พุทผลรวมของช่วงที่กลับด้านของ n

ผลรวมของช่วงที่ย้อนกลับถูกสร้างขึ้นโดยการทำให้ช่วงครอบคลุมถึง n เริ่มต้นด้วย 1 และรวมถึง n ย้อนกลับแต่ละตัวเลขภายในและรวมมัน

ตัวอย่าง:

นี่คือสิ่งที่จะเกิดขึ้นสำหรับอินพุต 10:

พิสัย: [1,2,3,4,5,6,7,8,9,10]

ย้อนกลับ: [1,2,3,4,5,6,7,8,9,01](หมายเลข 1- อักขระที่ตรงกันข้ามคือตัวเอง 10 รายการกลับเป็น 01 หรือ 1)

ผลรวม: 46

ตัวเลขที่มีตัวเลข 3+ จะกลับด้านเช่นเดียวกับตัวเลขที่มี 2 หลัก ตัวอย่างเช่น 1234 จะกลายเป็น 4321

กรณีทดสอบ:

Input -> Output

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

กรณีข้อความที่สมบูรณ์เพื่อการป้อนข้อมูลของ 999 สามารถพบได้ที่นี่ขอบคุณมากที่ @ fireflame241

05AB1E , 3 ไบต์

รหัส

LíO

ใช้การเข้ารหัส05AB1E ลองออนไลน์!

คำอธิบาย

L       # Range
 í      # Reverse
  O     # Sum

Bash + GNU utils, 24

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

ลองมันออนไลน์

คำอธิบาย

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

JavaScript (ES6), 42 ไบต์

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

โซลูชันทวีคูณที่ฉันชื่นชอบซ้ำแล้วซ้ำอีกน่าเสียดายที่ 3 ไบต์:

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

Perl 6 , 20 ไบต์

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

ทดสอบมัน

ขยาย:

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

เรติน่า , 41 36 35 ไบต์

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

.+
$*
1

ลองออนไลน์! ลิงค์มีกรณีทดสอบ แก้ไข: บันทึก 5 ไบต์ด้วย @FryAmTheEggman บันทึก 1 ไบต์ด้วย @ PunPun1000 คำอธิบาย:

.+
$*

แปลงเป็นเอก

1
1$`¶

สร้างช่วงจากไป1n

1+
$.&

แปลงกลับเป็นทศนิยม

%O^$`.

ย้อนกลับแต่ละหมายเลข

.+
$*

แปลงกลับเป็น unary

1

ผลรวมและแปลงกลับเป็นทศนิยม

เยลลี่ขนาด 4 ไบต์

Ṛ€ḌS

ลองออนไลน์!

อย่างไร?

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

Haskell, 34 ไบต์

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

เรียบง่ายและตรงไปตรงมา

C (gcc) , 63 ไบต์

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

ลองออนไลน์!

cQuents , 4 ไบต์

;\r$

ลองออนไลน์!

คำอธิบาย

       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 ไบต์

ไม่สามารถคำนวณคำที่สูงกว่าขีด จำกัด การเรียกซ้ำได้:

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

ลองออนไลน์!

Brachylogขนาด 4 ไบต์

⟦↔ᵐ+

ลองออนไลน์!

คำอธิบาย

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

Röda , 56 41 36 ไบต์

บันทึก 15 ไบต์ด้วย @fergusq

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

ลองออนไลน์!

นี่คือฟังก์ชั่นที่ไม่ระบุชื่อที่ใช้จำนวนเต็มจากอินพุตสตรีมและส่งออกจำนวนเต็มไปยังเอาต์พุตสตรีม

คำอธิบาย

{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 ไบต์

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

ลองออนไลน์!

ลิงก์ TIO จะแสดงผลลัพธ์ทั้งหมดตั้งแต่ 1 ถึง 999 ดังนั้นอย่าลังเลที่จะตรวจสอบงานของฉัน

ฉันคาดว่าสิ่งนี้จะสั้นกว่านี้เล็กน้อย แต่กลับกลายเป็นReverse()คืนค่าIEnumerable<char>แทนที่จะเป็นสตริงอื่นดังนั้นฉันจึงต้องเพิ่มส่วนพิเศษบางอย่างเพื่อเปลี่ยนกลับเป็นสตริงดังนั้นฉันจึงสามารถแยกมันเป็น int ได้ อาจจะมีวิธีที่สั้นกว่าที่จะไปจากIEnumerable<char>ไปเป็น int อย่างถูกต้อง

ของโน้ตเล็กน้อยนี้ยังใช้ฟังก์ชั่นRange() Reverse()และSum()ทั้งหมดในการสั่งซื้อ

-6 ไบต์ขอบคุณ TheLethalCoder

ทับทิม, 56, 52, 41, 39 ไบต์

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

Ruby, 34 ไบต์ (หาก lambda param เป็นสตริง)

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

ขอบคุณ @Unihedron สำหรับวิธีแก้ปัญหาที่สอง

Mathematica, 47 ไบต์

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

ลองออนไลน์! (เพื่อที่จะทำงานกับคณิตศาสตร์เราจำเป็นต้องแทนที่ "Tr" ด้วย "รวม")

ถ่าน , 14 13 ไบต์

-1 ไบต์ขอบคุณCarlos Alejo

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

ลองออนไลน์! ลิงก์คือเวอร์ชัน verbose

คำอธิบาย

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

Magneson , 102 ไบต์

ไม่ปรากฏให้เห็นดังนั้นรุ่นต่อไปนี้เป็นรุ่นที่ปรับขนาดแล้ว (หมายเหตุ: จะไม่ทำงานจริง แต่ก็ยังไม่สวยมาก)

Magneson ดำเนินการโดยแยกวิเคราะห์รูปภาพและประเมินคำสั่งจากสีของพิกเซลที่อ่าน ดังนั้นเมื่อก้าวผ่านภาพสำหรับความท้าทายนี้เรามี:

• R: 0, G: 1, B: 1เป็นคำสั่งกำหนดจำนวนเต็มซึ่งใช้สตริงสำหรับชื่อตัวแปรและค่าที่จะกำหนด เราจะใช้สิ่งนี้เพื่อเก็บผลรวมทั้งหมด
• R: 0, G: 1, B: 0เป็นสตริงที่สร้างไว้ล่วงหน้าพร้อมค่าVAR_1(หมายเหตุ: นี่คือเมื่อเราขอสตริงเท่านั้นโค้ดสีมีฟังก์ชันแยกต่างหากเมื่อใช้ที่อื่น)
• R: 3, G: 0, B: 0เป็นจำนวนดิบ Magneson จัดการกับหมายเลขมาตรฐานโดยกำหนดให้องค์ประกอบสีแดงเป็น 3 อย่างแน่นอนจากนั้นจัดรูปแบบตัวเลขโดยใช้ค่าสีน้ำเงินโดยตรงบวกกับค่าสีเขียวคูณด้วย 256 ในกรณีนี้เราเพิ่งได้ตัวเลข 0
• R: 0, G: 1, B: 1เป็นอีกคำสั่งกำหนดจำนวนเต็ม เวลานี้เรากำลังจัดเก็บตัวแปรการวนซ้ำเพื่อติดตามหมายเลขที่เรากำลังอยู่
• R: 0, G: 1, B: 1เป็นสตริงที่สร้างไว้ล่วงหน้าพร้อมค่าVAR_2(อีกครั้งเมื่อเราต้องการสตริงเท่านั้น)
• R: 3, G: 0, B: 0คือหมายเลข 0 อีกครั้ง บนบิตที่น่าสนใจตอนนี้
• R: 1, G: 0, B: 0ระบุการเริ่มต้นของลูป การทำเช่นนี้จะใช้ตัวเลขและวนซ้ำของโค้ดต่อไปนี้หลายครั้ง
• R: 2, G: 0, B: 0เป็นฟังก์ชั่น STDIN หรืออย่างน้อยก็เมื่อเราต้องการตัวเลข สิ่งนี้จะอ่านบรรทัดอินพุตจากคอนโซลและเปลี่ยนเป็นตัวเลขเนื่องจากเราขอตัวเลข
• R: 0, G: 8, B: 0เริ่มต้นโค้ดการวนลูปของเราและเป็นคำสั่งเพิ่มเติม สิ่งนี้จะเพิ่มตัวเลขให้กับตัวแปรจำนวนเต็มและใช้สตริงสำหรับชื่อตัวแปรและจำนวนที่จะเพิ่ม
• R: 0, G: 1, B: 1เป็นสตริงที่สร้างไว้ล่วงหน้าVAR_2ซึ่งเป็นตัวแปรการทำซ้ำของเรา
• R: 3, G: 0, B: 1 เป็นตัวเลขดิบ แต่ครั้งนี้เป็นหมายเลข 1
• R: 0, G: 8, B: 0 เป็นอีกคำสั่งนอกจากนี้
• R: 0, G: 1, B: 0เป็นสตริงสำหรับVAR_1ซึ่งเป็นผลรวมของเรา
• R: 0, G: 3, B: 0เป็นฟังก์ชั่นที่ฝืนสตริง ในบริบทของการขอตัวเลขมันจะแปลงสตริงที่กลับด้านเป็นตัวเลข
• R: 0, G: 2, B: 1เป็นคำสั่งการดึงข้อมูลจำนวนเต็มและจะดึงหมายเลขที่เก็บไว้ในตัวแปรที่ให้ไว้ ในบริบทของการขอสตริง (เช่นจากคำสั่ง reverse) มันจะแปลงตัวเลขเป็นสตริง
• R: 0, G: 1, B: 1เป็นชื่อVAR_2; ตัวแปรการวนซ้ำของเรา
• R: 1, G: 0, B: 1เป็นเครื่องหมายเพื่อสิ้นสุดการวนซ้ำและย้อนกลับไปที่จุดเริ่มต้นของการวนรอบหากไม่ตรงตามเกณฑ์ (ดังนั้นหากเราจำเป็นต้องวนซ้ำไปเรื่อย ๆ ) มิฉะนั้นให้ดำเนินการต่อไป
• R: 0, G: 0, B: 1 เป็นคำสั่ง println ที่ง่ายมากและรับค่าสตริง
• R: 0, G: 2, B: 1 ดึงจำนวนเต็มจากตัวแปร

• R: 0, G: 1, B: 0 เป็นชื่อของผลรวมทั้งหมดของเรา VAR_1

  ทั้งหมดในทุกโปรแกรม:

• กำหนดค่า 0 ถึงVAR_1และVAR_2
• วนจาก 0 เป็นหมายเลขที่ระบุใน STDIN
  • เพิ่มหนึ่งถึง VAR_2
  • เพิ่มค่าจำนวนเต็มของการย้อนกลับVAR_2ไปVAR_1
• พิมพ์เนื้อหาของ VAR_1

Python 2 , 50 47 ไบต์

-3 ไบต์ขอบคุณที่เป็นทางการ!

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

ลองออนไลน์!

CJam , 12 ไบต์

ri){sW%i}%:+

ลองออนไลน์!

-1 ขอบคุณที่ธุรกิจแมว

คำอธิบาย:

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 ไบต์

3 ไบต์ที่เล่นกอล์ฟด้วย @ Adámโดยแปลงเป็น tradfn จากรถไฟ

+/⍎⌽⍕⍳⎕

ลองออนไลน์!

⎕          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 ไบต์

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

แก้ไข

ตามความคิดเห็นของ Kevin Cruijssenฉันต้องการปรับปรุงคำตอบของฉัน

Java 8, 103 ไบต์

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

Japt , 7 5 ไบต์

-2 ไบต์ต้องขอบคุณ @Shaggy

õs xw

ลองออนไลน์!

คำอธิบาย

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

โซลูชันเก่า 7 ไบต์

z2การรักษานี้ตั้งแต่มันเย็นจริงๆการใช้งานของ

õs z2 x

ลองออนไลน์!

คำอธิบาย

õ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 ไบต์

#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;}

Husk , 7 6 3 ไบต์

ṁ↔ḣ

ลองออนไลน์!

Ungolfed / คำอธิบาย

  ḣ  -- 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 ไบต์

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

ลองออนไลน์!

RProgN 2 , 8 ไบต์

{Ø.in}S+

อธิบาย

{Ø.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.

ลองออนไลน์!

Pyth , 8 6 ไบต์

^{-2 ไบต์ขอบคุณFryAmTheEggman!}

sms_`h

ลองออนไลน์!

Tcl , 66 ไบต์

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

ลองออนไลน์!

Neim , 4 ไบต์

Δ𝐫)𝐬

ลองออนไลน์!

คำอธิบาย

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

C (gcc) , 71 ไบต์

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;}

ลองออนไลน์!