ในสนามกอล์ฟค่ามาตรฐานของหลักสูตรจะคำนวณโดยใช้สูตรนี้:

(3*num_of_3_par_holes + 4*num_of_4_par_holes + 5*num_of_5_par_holes) - difficulty_rating

งานของคุณคือการคำนวณรอยขีดข่วนมาตรฐานของสนามกอล์ฟซึ่งมีปัจจัยการผลิตทั้งสี่นี้

คุณควรป้อนข้อมูลในรูปแบบมาตรฐานใด ๆ ในรูปแบบ

[num_of_3_pars, num_of_4_pars, num_of_5_pars], difficulty rating

แต่ถ้ามันช่วยประหยัดไบต์คุณหลายคนใช้วิธีการที่แตกต่างกัน

คุณควรส่งออกผลลัพธ์สุดท้ายโดยวิธีการที่ยอมรับใน meta เช่นกลับมาจากฟังก์ชั่น

รหัสที่สั้นที่สุดชนะเพราะนี่คือรหัสกอล์ฟ !

ขีดข่วน145 ไบต์

<sup>-2 ขอบคุณ boboquack
- ??? เพราะการเขียนเป็นOtoสั้นกว่าภาษาอังกฤษ</sup>

(เพราะ Scratch เป็นรอยขีดข่วนมาตรฐาน)

นี่คือตัวอย่างการเรียกใช้:

.

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

JḊ~æ.N

ลองออนไลน์!

มันทำงานอย่างไร

JḊ~æ.N  Main link. Argument: [a, b, c, d]

J       Indices; yield [1, 2, 3, 4].
 Ḋ      Dequeue; yield [2, 3, 4].
  ~     Bitwise NOT; yield [-3, -4, -5].
     N  Negate; yield [-a, -b, -c, -d].
   æ.   Dot product; yield
        (-3)(-a) + (-4)(-b) + (-5)(-c) + (-d) = 3a + 4b + 5c - d.

Java (OpenJDK 8) , 24 ไบต์

(a,b,c,d)->a*3+b*4+c*5-d

ลองออนไลน์!

Haskell , 22 ไบต์

(a#b)c d=3*a+4*b+5*c-d

ลองออนไลน์! การใช้งาน: อัตราผลตอบแทน(3#2)5 735

รูปแบบอินพุตที่ไม่ดีนี้มีขนาดหนึ่งไบต์ที่สั้นกว่าโซลูชันทางตรง:

f a b c d=3*a+4*b+5*c-d

รูปแบบอินพุตที่ไม่มีจุดและดี: (23 ไบต์)

(-).sum.zipWith(*)[3..]

ลองออนไลน์! เชื่อมโยงกับและโทรกับff [3,2,5] 7

Mathematica, 13 14 ไบต์

{3,4,5,-1}.#&

ขอบคุณ @GregMartin รับอินพุตเป็นรายการความยาว 4

Python 3 , 28 ไบต์

lambda a,b,c,d:3*a+4*b+5*c-d

ลองออนไลน์!

Javascript ขนาด 24 ไบต์

(a,b,c,d)=>3*a+4*b+5*c-d

Perl6, 16 ตัวอักษร

3* *+4* *+5* *-*

(Yepp นั่นคือส่วนย่อย)

วิ่งตัวอย่าง:

> say 3* *+4* *+5* *-*
{ ... }

> say (3* *+4* *+5* *-*)(4, 3, 2, 1)
33

ลองออนไลน์!

Julia 0.5 , 15 ไบต์

!v=v⋅[3:5;-1]

ลองออนไลน์!

C #, 24 ไบต์

(a,b,c,d)=>a*3+b*4+c*5-d

x86-64 รหัสเครื่อง 14 ไบต์

8D 3C 7F 8D 14 92 8D 04 B7 01 D0 29 C8 C3

ฟังก์ชั่นต่อไปนี้เรียกประชุม System V AMD64 (แพร่หลายในระบบ Gnu / Linux) ที่ใช้พารามิเตอร์จำนวนเต็มสี่:

• EDI = num_of_3_par_holes
• ESI = num_of_4_par_holes
• EDX = num_of_5_par_holes
• ECX = ความยากลำบาก

ส่งกลับค่าเดียวคือค่าเริ่มต้นมาตรฐานในการEAXลงทะเบียน

คำย่อของชุดประกอบ Ungolfed:

; int ComputeStandardScratch(int num_of_3_par_holes,
;                            int num_of_4_par_holes,
;                            int num_of_5_par_holes,
;                            int difficulty_rating);
lea   edi, [rdi+rdi*2]    ; EDI = num_of_3_par_holes * 3
lea   edx, [rdx+rdx*4]    ; EDX = num_of_5_par_holes * 5
lea   eax, [rdi+rsi*4]    ; EAX = EDI + (num_of_4_par_holes * 4)
add   eax, edx            ; EAX += EDX
sub   eax, ecx            ; EAX -= difficulty_rating
ret                       ; return, leaving result in EAX

เพียงการแปลสูตรอย่างง่าย สิ่งที่น่าสนใจคือรหัสนี้เป็นโค้ดเดียวกับที่คุณเขียนเมื่อปรับความเร็วให้เหมาะสมเช่นกัน นี้จริงๆแสดงให้เห็นถึงพลังของ x86 นั้นLEAการเรียนการสอนซึ่งถูกออกแบบมาเพื่อลิตร OAD อี ffective ddress แต่สามารถทำได้นอกจากนี้และปรับ (คูณโดยอำนาจต่ำของ 2) ในคำสั่งเดียวจึงทำให้มีประสิทธิภาพอเนกประสงค์เลขคณิตเทียม .

เจลลี่ , 10 7 ไบต์

3r5×⁸S_

ลองออนไลน์!

-3 ไบต์ขอบคุณ Erik The Outgolfer!

มันทำงานอย่างไร!

3r5×⁸S_  Main link: a, the pars as a list and b, the difficulty rating

     S   The sum of
3r5        [3, 4, 5]
   ×       each element times
    ⁸      the left argument (a)
      _  Subtract the right argument (b)

อ็อกเทฟ , 14 ไบต์

@(a)[3:5 -1]*a

ลองออนไลน์!

เกี่ยวกับสองครั้งตราบใดที่คำตอบ MATL ผมเริ่มแท้จริงรังเพลิงนี้เพื่อ MATL แต่มันกลับกลายเป็นมีความยาวมากกว่าเพียงแค่iY* *sโปรดทราบว่าอินพุตaที่มีรูตามลำดับและความยากควรเป็นเวกเตอร์คอลัมน์

จูเลีย 21 ไบต์

f(a,b,c,d)=3a+4b+5c-d

ลองออนไลน์!

Neim , 7 ไบต์

'π𝐂𝕋𝐬S𝕊

คำอธิบาย:

'π         Push 345
           The character ' pushes the next character's index in the codepage plus 100.
           The characters ", + and * do that same thing except add a different number.
           This means that in Neim, all 3 digit numbers can be expressed with 2 characters.
           This commit was pushed 8 days before the answer was posted.
  𝐂        Get the characters
   𝕋       Vectorised multiply with the input
    𝐬       Sum the resulting list
     S𝕊    Subtract the input

โปรแกรมทางเลือก: 3𝐈ᛖ𝕋𝐬S𝕊

แทนการผลักดัน345และจากนั้นได้รับตัวละครสร้างอาร์เรย์[1 2 3]ใช้3𝐈แล้วเพิ่ม 2 ᛖถึงแต่ละองค์ประกอบด้วย

ลองออนไลน์!

C (gcc) , 30 ไบต์

e;f(a,b,c,d){e=3*a+4*b+5*c-d;}

ลองออนไลน์!

Swift 3 , 25 19 bytes

ฉันรู้ว่าคุณไม่ต้องการvar f=เพราะคุณสามารถเรียกมันเหมือนกับแลมบ์ดา Python:

{$0*3+$1*4+$2*5-$3}

ทดสอบออนไลน์!

การใช้งาน: {$0*3+$1*4+$2*5-$3}(a,b,c,d)ซึ่งa,b,c,dเป็นพารามิเตอร์

brainfuck , 39 ไบต์

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

ลองออนไลน์!

รับอินพุตและพิมพ์เอาต์พุตเป็นอักขระ ASCII; ตัวอย่างเช่นค่า 99 จะแสดงเป็น c

คำอธิบาย:

,                                       Take the first input in Cell 0
 [      ]                               While the data being pointed to (Cell 0) is nonzero
  ->+++<                                Decrement Cell 0 and add 3 to Cell 1
                                        Now 4 times the first input is in Cell 1
         ,                              Take the second input in Cell 0
          [->++++<]                     Add 4 times the second input to Cell 1
                   ,[->+++++<]          Take the third input in Cell 0 and add five times its value to Cell 1
                              ,         Take the fourth input in Cell 0
                               [    ]   While the data being pointed to (Cell 0) is nonzero
                                ->-<    Decrement Cells 0 and 1
                                     >. Print the value in Cell 1

Gallina , 38 ไบต์

Definition f a b c d := 3*a+4*b+5*c-d.

dc, 14 ตัวอักษร

?3*?4*+?5*+?-p

ตัวเลขจะต้องผ่านในบรรทัดที่แยกต่างหาก

วิ่งตัวอย่าง:

bash-4.4$ dc -e '?3*?4*+?5*+?-p' <<< '4
> 3
> 2
> 1'
33

ลองออนไลน์!

Brachylog , 18 16 ไบต์

∧5⟦₁↺b;?z×ᵐġ₃+ᵐ-

ลองออนไลน์!

-2 ขอบคุณที่Fatalize

,,,, 12 ไบต์

↻5×↻4×↻3×↻-#

คำอธิบาย

ยกตัวอย่างเช่นอินพุต 4, 3, 2, 1

↻5×↻4×↻3×↻-#

              implicit input                  [4, 3, 2, 1]
↻             rotate the stack clockwise      [1, 4, 3, 2]
 5            push 5                          [1, 4, 3, 2, 5]
  ×           pop 2 and 5 and push 2 * 5      [1, 4, 3, 10]
   ↻          rotate the stack clockwise      [10, 1, 4, 3]
    4         push 4                          [10, 1, 4, 3, 4]
     ×        pop 3 and 4 and push 3 * 4      [10, 1, 4, 12]
      ↻       rotate the stack clockwise      [12, 10, 1, 4]
       3      push 3                          [12, 10, 1, 4, 3]
        ×     pop 4 and 3 and push 4 * 3      [12, 10, 1, 12]
         ↻    rotate the stack clockwise      [12, 12, 10, 1]
          -   pop 10 and 1 and push 10 - 1    [12, 12, 9]
           #  pop 12, 12, 9 and push the sum  [33]
              implicit output

Cubix , 36 ไบต์

w;r5*U4I;I3*r;UW;;r;<\r/;r-I/+p+O@;w

ลองออนไลน์!

      w ; r
      5 * U
      4 I ;
I 3 * r ; U W ; ; r ; <
\ r / ; r - I / + p + O
@ ; w . . . . . . . . .
      . . .
      . . .
      . . .

ดูมันวิ่ง

โปรแกรมเชิงเส้นตรงที่หมุนวนกลับเข้าหาตัวเองสองสามครั้ง ขั้นตอนพื้นฐาน:

• I3*r;U; รับอินพุตแรกคูณด้วย 3 และล้างข้อมูลสแต็ก
• I4*/r\ รับอินพุตถัดไปและคูณด้วย 4 หมุนผลลัพธ์ลง
• Iw5*Ur;w<;r;;W รับอินพุตถัดไปคูณด้วย 5 และล้างสแต็ก
• I-r;w; รับอินพุตสุดท้ายลบจากผลพาร์ 5 และล้างสแต็ก
• /+p+O\@ เพิ่มไปยังผลลัพธ์พาร์ 4 นำผลลัพธ์พาร์ 3 ไปที่ด้านบนสุดเพิ่มเอาต์พุตและหยุด

HP-15C (RPN), 14 ไบต์

รหัสฐานสิบหกการเรียนการสอน:

41 C4 F5 FC C5 F4 FC FA C5 F3 FC FA 31 FB

รุ่นที่อ่านได้:

001 {       44  1 } STO 1
002 {          33 } R⬇
003 {           5 } 5
004 {          20 } ×
005 {          34 } x↔y
006 {           4 } 4
007 {          20 } ×
008 {          40 } +
009 {          34 } x↔y
010 {           3 } 3
011 {          20 } ×
012 {          40 } +
013 {       45  1 } RCL 1
014 {          30 } −

ตัวเลขสี่ตัวถูกโหลดเข้าในสแต็กก่อนสั่งรันโปรแกรม

Excel VBA ขนาด 20 ไบต์

ไม่ประสงค์ออกนาม VBE ฟังก์ชั่นหน้าต่างทันทีที่ใช้ข้อมูลจากช่วง[A3:A6]ที่[A3:A5]แทนจำนวนของ3, 4และ5หลุมที่ตราไว้หุ้นตามลำดับและ[A6]แสดงให้เห็นถึงความยากลำบาก ส่งออกไปยังหน้าต่างทันที VBE

?[3*A3+4*A4+5*A5-A6]

ด้านบนเป็นรูปแบบย่อของการโทร

Debug.Print Application.Evaluate("=3*A3+4*A4+5*A5-A6")

ที่"=3*A3+4*A4+5*A5-A6"ได้รับจะเป็นสูตรของเซลล์ที่ไม่ระบุชื่อตามที่ระบุโดย[...]เสื้อคลุมและ?เป็นรุ่นที่เลิกใช้ของการPrintโทรที่มีนัยDebug.โดยบริบท

เวอร์ชันที่สนุกมากขึ้น 34 ไบต์

ฟังก์ชั่นหน้าต่าง VBE แบบไม่ระบุชื่อทันทีที่มีเงื่อนไข I / O เดียวกันข้างต้น

?[SUMPRODUCT(A3:A5,ROW(A3:A5))-A6]

ด้านบนเป็นรูปแบบย่อของการโทร

Debug.Print Application.Evaluate("=SUMPRODUCT(A3:A5,ROW(A3:A5))")

ที่"=SUMPRODUCT(A3:A5,ROW(A3:A5))"ได้รับจะเป็นสูตรของเซลล์ที่ไม่ระบุชื่อตามที่ระบุโดย[...]เสื้อคลุมและ?เป็นรุ่นที่เลิกใช้ของการPrintโทรที่มีนัยDebug.โดยบริบท ในรุ่นนี้ช่วง[A3:A5]และหมายเลขแถวของช่วงนั้น ( ROWS(A3:A5)) จะถูกส่งผ่านเป็นอาร์เรย์

รุ่น Excel ขนาด 18 ไบต์

แน่นอนรุ่นข้างต้นให้ยืมตัวเองเพื่อรุ่น excel ของ

=3*A3+4*A4+5*A5-A6

และ

=SUMPRODUCT(A3:A5,ROW(A3:A5))-A6

R , 25 23 ไบต์

cat(c(3:5,-1)%*%scan())

ลองออนไลน์!

Befungeขนาด 15 ไบต์

&3*&4*+&5*+&-.@

ลองออนไลน์!

Japt , 12 ไบต์

*3+V*4+W*5-X

ทดสอบมัน

Braingolfขนาด 14 ไบต์

3*>4*>5*>>++,-

ลองออนไลน์!

05AB1E , 7 ไบต์

3LÌ*O²-

ลองออนไลน์!