เนื่องจากประเทศส่วนใหญ่ที่ใช้ยูโรมี ,ตัวคั่นทศนิยมคุณต้องใช้ด้วยเช่นกัน

ภารกิจคือส่งออกค่าทั้งหมดของเหรียญยูโรและธนบัตรในลำดับจากน้อยไปหามาก คุณต้องใส่ส่วนท้าย,00ของค่าจำนวนเต็ม

0,01 0,02 0,05 0,10 0,20 0,50 1,00 2,00 5,00 10,00 20,00 50,00 100,00 200,00 500,00

ฉันยอมรับทั้งเอาต์พุตไปยัง stdout หรือฟังก์ชั่นที่ส่งคืนอาร์เรย์ / รายการ หากเอาต์พุตคือ stdout ตัวคั่นที่ยอมรับได้ระหว่างค่าคือ: space, tab หรือ newline

จะไม่มีคำตอบที่ยอมรับเว้นแต่ฉันจะเห็นคนที่ฉันคิดว่าสร้างสรรค์มาก

code-golfดังนั้นฉันต้องการรู้คำตอบสั้น ๆ ด้วยภาษา

ปรับปรุง:

0ค่าศูนย์นำหน้าไม่เป็นที่ยอมรับ ขออภัยฉันควรทำให้ชัดเจนก่อน

อัปเดต 2:

นอกจากนี้ยังเป็นที่ยอมรับฟังก์ชั่นกลับสตริง

Pure Bash, 48

s={1,2,5}
eval echo 0,0$s 0,${s}0 ${s}{,0,00},00

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

Japt , 23 22 ไบต์

-1 ไบต์ขอบคุณ @Shaggy

5Æ#}ì ®eX-2 x2 d".,"
c

ส่งคืนอาร์เรย์ของสตริง

ลองออนไลน์! ด้วย-Rแฟล็กเพื่อส่งออกรายการอาเรย์ในแต่ละบรรทัด

Python 2 , 72 ไบต์

print[('%.2f'%(10**(x/3-2)*(5>>~x%3))).replace(*'.,')for x in range(15)]

ลองออนไลน์!

การแสดงออก5>>~x%3แผนที่ integers เชิงลบเพื่อ1, 2, 5, 1, 2, 5...

มันทำงานได้เพราะ5, 2, 1เป็นต่อเนื่องขวาของ bitshifts 5( 0b101→การ0b10→การ0b1); เราวนกลับไปข้างหลัง

ถ่าน , 36 ไบต์

ＥＥ×125⁵⁺⁺×0⁻²÷κ³ι×0÷κ³⁺⁺✂ι⁰±²¦¹,✂ι±²

ลองออนไลน์! การเชื่อมโยงคือการใช้รหัสเวอร์ชันอย่างละเอียด คำอธิบาย:

   125                                  String `125`
  ×   ⁵                                 Repeated 5 times
 Ｅ                                      Map over each character
              ÷κ³   ÷κ³                 Integer divide loop index by 3
            ⁻²                          Subtract from 2
          ×0      ×0                    Repeat the string `0` x times
        ⁺⁺       ι                      Concatenate with the character
Ｅ                                       Map over each resulting string
                         ✂ι⁰±²¦¹        Slice off the last two digits
                                ✂ι±²    Extract the last two digits
                       ⁺⁺       ,       Concatenate with a comma
                                        Implicitly print one per line

SOGL ออนไลน์ออฟไลน์, 27 26 25 24 23 22 21 ไบต์

252¹5∙īυ;{⁴Ζ.,ŗP*F⁾?½

ลองที่นี่!

ลิงค์ออนไลน์ไม่แสดงศูนย์ต่อท้าย แต่เวอร์ชันออฟไลน์ทำเช่นเดียวกับ Javas BigDecimals ดีมาก

คำอธิบาย:

252¹5∙īυ;{⁴Ζ.,ŗP*F⁾?½
252¹                 push the array [2, 5, 2]
    5∙               multiply vertically by 5
      īυ;            push 0.01 below that - the main number
         {           iterate over that array - [2,5,2,2,5,2,2,5,2,2,5,2,2,5,2]
          ⁴            duplicate the main number
           Ζ.,ŗ        replace "." with ","
               P       output in a new line
                *      multiply the main number with the current item of the array
                 F⁾?   if the current array item-2 isn't 0, then
                    ½    divide by 2

หากต้องการทำงานในล่ามออฟไลน์ให้ดาวน์โหลดที่เก็บ SOGLOnlinesไปที่คอมไพเลอร์ / ล่ามเปิด.pdeไฟล์ใด ๆ ที่มีการประมวลผลแล้วทำไฟล์ -> ส่งออกสำหรับระบบปฏิบัติการของคุณ (มิฉะนั้นคุณจะไม่สามารถโต้แย้งโปรแกรมประมวลผล: /) จากนั้นรันโปรแกรมที่คอมไพล์ด้วยอาร์กิวเมนต์ไปยังพา ธ ของไฟล์ด้วยรหัส จากนั้นจะมี stdout นี้

2L¼2¹5∙īυ;{⁴Ζ.,ŗP*เกือบ 18 ไบต์ใช้งานได้ แต่จำนวนศูนย์เพิ่มขึ้นส่งผลให้0,01 0,02 0,050 0,100 0,200 0,5000 1,0000 2,0000 5,00000 10,00000 20,00000 50,000000 100,000000 200,000000 500,0000000(ขึ้นบรรทัดใหม่แทนที่ด้วยช่องว่าง)

Java 8, 109 108 81 80 ไบต์

ขอบคุณ @ OlivierGrégoireสำหรับแนวคิด Locale

x->{for(double i=.001;i<11;)System.out.printf("%.2f %.2f %.2f ",i*=10,i*2,5*i);}

ลองออนไลน์!

Bash , 38 ไบต์

printf %.2f\\n {1,2,5}e{-2..2}|sort -h

ต้องมีสถานที่ที่เหมาะสมที่จะได้รับอนุญาตโดยค่าเริ่มต้นและไม่มีค่าใช้จ่ายไบต์

ลองออนไลน์!

APL (Dyalog) , 30 28 ไบต์

โปรแกรมที่สมบูรณ์ ส่งออกไปยังช่องว่างคั่นด้วย STDOUT

'\.'⎕R','⊢2⍕×\.01,14⍴2 2.5 2

ลองออนไลน์!

2 2.5 2 รายการ;
 [2,2.5,2]

14⍴ ครบวงจรr eshape ยาว 14;
 [2,2.5,2,2,2.5,2,2,2.5,2,2,2.5,2,2,2.5]

.01 เติม 0.01;
 [0.01,2,2.5,2,2,2.5,2,2,2.5,2,2,2.5,2,2,2.5]

×\ การคูณสะสม
 [0.01,0.02,0.05,0.1,0.2,0.5,1,2,5,10,20,50,100,200,500]

2⍕ รูปแบบที่มีสองทศนิยม
 " 0.01 0.02 0.05 0.10 0.20 0.50 1.00 2.00 5.00 10.00 20.00 50.00 100.00 200.00 500.00"

⊢ ให้ผลผลิตที่ (แยก','จาก2)

'\.'⎕R',' PCRE R eplace ใช้เครื่องหมายจุลภาค;
 " 0,01 0,02 0,05 0,10 0,20 0,50 1,00 2,00 5,00 10,00 20,00 50,00 100,00 200,00 500,00"

R 70 , 50 ไบต์

แรงบันดาลใจจาก @Giuseppe:

format(c(1,2,5)*10^rep(-2:2,e=3),ns=2,de=",",sc=F)

ลองที่นี่!

Ungolfed

format(c(1,2,5)*10^rep(-2:2, each = 3),
   nsmall = 2, 
   decimal.mark = ",",
   scientific = FALSE)

Pyth , 37 ไบต์

smmX%"%.2f"*dk\.\,[1 2 5)[.01.1 1T^T2

ลองออนไลน์!

Pyth , 37 ไบต์

จะสั้นลงในไม่กี่นาที

V[.01.1 1T^T2)V[1 2 5)X%"%.2f"*NH\.\,

ลองออนไลน์!

JavaScript (ES6), 83 ไบต์

ส่งกลับอาร์เรย์

_=>[...'125'.repeat(k=5)].map(c=>(c*(c-1?k:k*=10)/5e3).toFixed(2).split`.`.join`,`)

การสาธิต

let f = 

_=>[...'125'.repeat(k=5)].map(c=>(c*(c-1?k:k*=10)/5e3).toFixed(2).split`.`.join`,`)

console.log(f())

เวอร์ชันแบบเรียกซ้ำ (ES7), 84 ไบต์

ส่งคืนสตริงที่มีช่องว่างต่อท้าย

f=(i=0)=>i<15?('125'[i%3]/100*10**(i/3|0)).toFixed(2).split`.`.join`,`+' '+f(i+1):''

การสาธิต

f=(i=0)=>i<15?('125'[i%3]/100*10**(i/3|0)).toFixed(2).split`.`.join`,`+' '+f(i+1):''

console.log(f())

Python 2 , 80 77 75 73 ไบต์

ขอขอบคุณ @ Mr.Xcoder
-2 ไบต์ขอบคุณ by @EriktheOutgolfer
-2 ไบต์ขอขอบคุณ @totallyhuman
-2 ไบต์ขอบคุณ @Lynn

print[('%.2f'%(v*m)).replace(*'.,')for m in.01,.1,1,10,100for v in 1,2,5]

ลองออนไลน์!

เรติน่า 42 ไบต์

5$*0
0
$'1$`¶$'2$`¶$'5$`¶
..¶
,$&
m`^00?

ลองออนไลน์! คำอธิบาย: มีสิบห้าค่าโดยที่ 1, 2 และ 5 ในแต่ละแห่งมีห้าแห่ง ด่านแรกแทรกห้า 0s ขั้นตอนที่สองทำซ้ำมันเป็นสี่เหลี่ยมจัตุรัสจากนั้นเปลี่ยนเส้นทแยงมุมเป็น 1s จากนั้นทำซ้ำบรรทัดเหล่านั้นสามครั้งด้วย 2 และ 5 ขั้นตอนที่สามแทรกเครื่องหมายจุลภาคและขั้นตอนสุดท้ายลบศูนย์นำที่ไม่จำเป็น

ถ่าน , 37 ไบต์

”{➙∧N\`�4✳×″↶tι⦄|Ｑ~(↥↗⁻“Ｑ§U‴w⎇δUη◨÷¤Ｇ”

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

เย้อัด!

Bash , 88 ไบต์

s=125
for i in {0..14};{ printf %1.2f\  `bc<<<"scale=2;${s:i%3:1}*10^$[i/3-2]"`|tr . ,;}

ลองออนไลน์!

JavaScript (ES6), 81 ไบต์

ส่งกลับอาร์เรย์

_=>[...Array(13),b=.005,i=0].map(p=>(b*=++i%3?2:2.5).toFixed(2).replace(".",","))

การสาธิต

let f = 

_=>[...Array(13),b=.005,i=0].map(p=>(b*=++i%3?2:2.5).toFixed(2).replace(".",","))

console.log(f())

เสียงกระเพื่อมสามัญ 95 ไบต์

(dotimes(i 5)(dolist(j'(1 2 5))(princ(substitute #\, #\.(format()"~$ "(*(expt 10(- i 2))j))))))

ลองออนไลน์!

Husk , 28 ไบต์

ṁm↔ṪöJ',CtN`J§¤eR'0≥≤2ḣ5"125

ลองออนไลน์!

เพียงแค่จัดการกับสตริงเนื่องจาก Husk นั้นแย่มากในการจัดรูปแบบตัวเลขจุดลอยตัว

คำอธิบาย

ṁm↔ṪöJ',CtN`J§¤eR'0≥≤2ḣ5"125
                        "125  The string "125".
                      ḣ5      The range [1,2,3,4,5].
   Ṫö                         Compute their outer product wrt this function:
                               Arguments are number n (say 3) and character c (say '5').
             §     ≥≤2         Compute max(0,n-2+1) and max(0,2-n+1),
                R'0            repeat '0' those numbers of times,
              ¤e               and put them into a list: ["00",""]
           `J                  Join with c: "005"
        CtN                    Split to lengths 2 and at most 3: ["00","5"]
     J',                       Join with ',': "00,5"
                              This gives a 2D array of the outputs reversed.
ṁ                             Map and concatenate
 m↔                           map reversal.
                              Implicitly print separated by newlines.

C ++, 138 120 ไบต์

-18 ไบต์ขอบคุณ MSalters

#include<iostream>
void p(){for(auto&a:{"0,0%d ","0,%d0 ","%d,00 ","%d0,00 ","%d00,00 "})for(int b:{1,2,5})printf(a,b);}

รุ่น Hardcoded โดย Lynn ขนาด 116 ไบต์

#include<ios>
void p(){puts("0,01 0,02 0,05 0,10 0,20 0,50 1,00 2,00 5,00 10,00 20,00 50,00 100,00 200,00 500,00");}

R , 70 61 ไบต์

options(scipen=9,OutDec=",")
print(c(1,2,5)*10^rep(-2:2,e=3))

ลองออนไลน์!

-9 ไบต์ขอบคุณ Rui Barradas

โดดเด่นด้วยAndriusZ

C (gcc) , 82 ไบต์

p(n){printf("%d,%02d ",n/100,n%100);}f(n){for(n=1;n<5e4;n*=10)p(n),p(n*2),p(n*5);}

ลองออนไลน์!

05AB1E , 25 ไบต์

125S5иεN3÷°*т/'.',:N2›i0«

ส่งคืนรายการของสตริง

ลองออนไลน์

คำอธิบาย:

125                          # Push 125
   S                         # Split to a list of digits: [1,2,5]
    5и                       # Repeat it 5 times: [1,2,5,1,2,5,1,2,5,1,2,5,1,2,5]
      ε                      # Map each to:
       N3÷                   #  Integer-divide the map-index by 3
          °                  #  Take it to the power 10
           *                 #  Multiply the current map number with it
            т/               #  Divide it by 100
              '.',:          #  Replace all "." with ","
                   N2›i      #  And if the map-index is larger than 2:
                       0«    #   Append a "0"

125S5иอาจเป็น•}•15∍(บีบอัดบีบอัด125ขยายเป็นขนาด 15:) 125125125125125และ'.',:อาจเป็น„.,`:(พุชสตริง "." ป๊อปและดันอักขระเป็นรายการที่แยกไปยังสแต็ก) สำหรับจำนวนไบต์เดียวกัน: ลองออนไลน์
นอกจากนี้ยังN3÷°*т/สามารถตัดให้สั้นลงN3÷Í°*(เมื่อมีการÍลบ 2) แต่น่าเสียดายที่เราต้องการ/ให้ตัวเลขทั้งหมดกลายเป็นทศนิยมในขณะN3÷Í°*ที่ตัวเลขส่วนใหญ่จะยังคงเป็นจำนวนเต็ม

T-SQL, 104 ไบต์

SELECT FORMAT(p*n,'0\,00')
FROM(VALUES(1),(2),(5))a(n),(VALUES(1),(10),(100),(1E3),(1E4))b(p)
ORDER BY p,n

การขึ้นบรรทัดใหม่มีไว้เพื่อให้สามารถอ่านได้เท่านั้น

น่ารำคาญนานกว่าPRINTเวอร์ชั่นเล็กน้อย(90 ไบต์):

PRINT'0,01 0,02 0,05 0,10 0,20 0,50 1,00 2,00 5,00 10,00 20,00 50,00 100,00 200,00 500,00'

Bubblegum , 41 ไบต์

00000000: 1dc5 8105 0040 1402 d055 1ae0 50d1 feab  .....@...U..P...
00000010: dd2f 788f 8fc2 e192 433c 5c42 e891 7049  ./x.....C<\B..pI
00000020: 11ab 67a6 b8bc 90f5 01                   ..g......

ลองออนไลน์!

เรติน่า 58 ไบต์

¶0¶00¶000¶0000¶
.*¶
1$&2$&5$&
^
¶
+`¶(.?.?¶)
¶0$1
..¶
,$&

ลองออนไลน์!

Ruby , 66 62 ไบต์

-2.upto 2{|m|[1,2,5].map{|v|$><<('%.2f '.%v*10**m).tr(?.,?,)}}

สั้นลง 4 ไบต์ด้วยLynn !

ลองออนไลน์!

C # (. NET Core) , 107 ไบต์

Console.Write("0,01{0}2{0}5 0,10 0,20 0,50 1{1}2{1}5{1}1{2}2{2}5{2}10{2}20{2}50{2}"," 0,0",",00 ","0,00 ");

เรียกใช้

JavaScript - 96 ไบต์

x=>{for(o="",b=-2;b<3;b++)for(n of[1,2,5])o+=(n*10**b).toFixed(2).replace(".",",")+" ";return o}

และนี่คือวิธีการทำงานที่ยาวกว่า (98 ตัวอักษร) เล็กน้อย:

x=>[].concat.apply([],[.01,.1,1,10,100].map(n=>[n,n*2,n*5])).map(n=>n.toFixed(2).replace(".",","))

J , 36 ไบต์

echo'.,'charsub 0j2":,1 2 5*/~10^i:2

ลองออนไลน์!

Tcl , 80 ไบต์

lmap d {-2 -1 0 1 2} {lmap c {1 2 5} {puts [regsub \\. [format %.2f $c\e$d] ,]}}

ลองออนไลน์!

lmap d {.01 .1 1 10 100} {lmap c {1 2 5} {puts [regsub \\. [format %.2f [expr $c*$d]] ,]}}

ลองออนไลน์!

ยังคงนานมากเล่นกอล์ฟได้ในภายหลัง!