สุขสันต์วันปี่


25

เพื่อเป็นการเฉลิมฉลองวัน Rounded Pi คุณต้องใช้ประโยชน์จากวันที่วันนี้เพื่อสร้างโปรแกรมที่ใช้เส้นผ่านศูนย์กลางของวงกลมและออกรอบโดยการคูณเส้นผ่านศูนย์กลางด้วย 3.1416 โดยที่ต้องได้รับ 3.1416 โดยใช้วันที่วันนี้

Input 3
Output 9.4248
etc.

ไม่ใช้วันที่เป็นอินพุต คุณไม่จำเป็นต้องใช้ส่วนประกอบทั้งหมดของวันที่ แต่ตัวเลขของ pi ต้องมาจากการจัดรูปแบบวัตถุ Date หรือใช้วัตถุ Date เพื่อรับมัน คำตอบที่ดูดี

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

ข้อ จำกัด ของฉันคือคุณต้องใช้ส่วนประกอบของวันที่ที่จะเกิดขึ้นกับ Pi แน่นอนคุณสามารถใช้ส่วนประกอบคูณด้วย 0 จากนั้นเพิ่ม 3.1416 แต่มันน่าเบื่อและมีค่าเหลือเกิน!

รหัสที่สั้นที่สุดชนะ!


61
มีอะไรพิเศษเกี่ยวกับ 14/3/16?
Neil

5
กำหนดโดยใช้วันที่วันนี้ ฉันจะได้รับวันที่เป็นตัวเลขหารด้วยตัวเองและคูณด้วยค่าคงที่ที่กำหนดไว้ล่วงหน้าสำหรับpi
Luis Mendo

7
@Neil: เนื่องจาก 3/14/16 และ 31/4/16 ไม่ใช่วันที่จริงในรูปแบบ D / M / Y ไม่มี 14 เดือนและเมษายนมีเพียง 30 วัน ฉันคิดว่าเราควรรอจนกระทั่ง 6/28/32 (M / D / Y) หรืออาจ 6/2/83 (D / M / Y) แต่นั่นเป็นสงครามศักดิ์สิทธิ์อื่นทั้งหมด
Darrel Hoffman

8
@DarrelHoffman คุณเป็นผู้ชายเอกภาพฉันเห็น
jmasterx

16
น่าเศร้าที่เป็นวัน PI เดียวในเขตวัฒนธรรมของสหรัฐอเมริกา ชาวยุโรปที่มีการสั่งซื้อวันที่ด้วยความงี่เง่าโง่ ๆ ของพวกเขาไม่ได้รับวัน PI รายปี อย่าเศร้าใจกับพวกเขาเพราะคุณกำลังกินปี่ ​​(e) วันนี้
TED

คำตอบ:


8

05AB1E, 16 13 ไบต์

žfžežg¦¦J*4°/

ลองออนไลน์

น่าเสียดายข้อผิดพลาดที่มีลอยทำให้นี่เป็นไบต์อีกต่อไป: /

ขอบคุณ Adnan สำหรับการเล่นกอล์ฟ 3 ไบต์

คำอธิบาย

žfžežg¦¦J*4°/
žfžežg         push month day year
      ¦¦       slice off the first two chars from the year (2016 -> 16)
        J      join them together into a number
         *     multiply by input
          4°/  divide by 1e4

¦¦แทนที่จะ2000-สั้นกว่าสามไบต์;)
Adnan

11
+1 žfžežgฟังดูเป็นคำภาษาเช็กที่ดี :)
yo '

ใน UTF-8 รวมทั้งหมด 19 ไบต์
OldBunny2800

3
@ OldBunny2800 05AB1E ใช้ CP1252 ในการเข้ารหัส
สปาเก็ตตี้

ข้อผิดพลาดกับลอยตัว?
CalculatorFeline

19

C, 32 ไบต์

#define f(d)d*time(0)/464083315.

หากการสูญเสียความแม่นยำน้อยกว่าเล็กน้อยก็โอเคฉันสามารถทำให้มันลดลงเหลือประมาณ 29 ไบต์ซึ่งยังคงมีความถูกต้องถึง 4 หลักผ่านทศนิยม (ณ เวลาที่ทำการโพสต์นี้):

#define f(d)d*time(0)/46408e4

#include<time.h>?
แมว

นอกจากนี้รหัสที่ปฏิบัติการได้อยู่ที่ไหน นี่เป็นเพียงบางอย่างที่ preprocessor จะคัดลอก / วาง ตัวอย่าง เราชอบการนำไปใช้ที่รันได้ที่นี่
แมว

3
@tac คอมไพเลอร์ C ส่วนใหญ่ไม่ต้องการให้คุณใช้#includeส่วนหัวของไลบรารีมาตรฐาน การรวมพวกเขาด้วยตนเองเป็นความคิดที่ดี แต่การไม่ใส่โค้ดทำให้การเล่นกอล์ฟใน C ง่ายขึ้นมาก
Josh

12
@tac คำตอบส่วนใหญ่จะทำงานเหมือนกับฟังก์ชั่น คำตอบหลายข้อในที่นี้คือฟังก์ชั่นแบบสแตนด์อโลนเช่นกัน ฉันไม่เห็นจุดในการจัดทำmainฟังก์ชันตัวอย่างเพื่อสาธิตวิธีเรียกใช้แมโครอาร์กิวเมนต์เดี่ยวนี้
Josh

1
@tac ฉันคิดว่ากฎ [code-golf] มาตรฐานคือถ้าฟังก์ชั่นต้องห้ามนั้นใช้ได้
Mindwin

14

AppleScript 122 122ไบต์

set a to current date
(display dialog""default answer"")'s text returned*(month of a+day of a*.01+year of a*1e-4 mod.01)

ตัวแปร

ตัวแปร a เป็นวัตถุวันที่ ฉันเรียกข้อมูลวันที่ทั้งหมดของฉันออกจากมัน

เดือนวันและปี

การเรียกเดือนวันและปีจะส่งคืนวัตถุที่ตามปกติจะส่งคืนสตริง หากต้องการใช้เป็นตัวเลขอย่างถูกต้องฉันได้ล้อมรอบทั้งสองด้านด้วยการดำเนินการทางคณิตศาสตร์เพื่อแปลงเป็นตัวเลขโดยอัตโนมัติ

1e-4

1e-4.0001เป็นไบต์สั้นกว่า

mod.01

.ทำหน้าที่เป็นตัวแยกการแก้ไขอัตโนมัติของ AppleScript โดยใช้สิ่งนี้ฉันสามารถใช้ modulo และยังคงเก็บไว้เป็นไบต์สำหรับตัวเอง

ไม่มีคำสั่งส่งคืน / บันทึก

โปรแกรมจะส่งคืนค่าสุดท้ายที่คำนวณโดยอัตโนมัติ ฉันส่งออกจำนวนที่คำนวณผ่านกล่องส่งคืน

และนี่คือ gif ของมันทำงาน!

pi day gif


8
ลืมจาวานี่จะต้องเป็นภาษาที่ละเอียดที่สุด
Downgoat

@ ลงนามฉันเดาว่ามันควรจะเป็น "อ่านได้เหมือนภาษาอังกฤษ" หรือบางสิ่งบางอย่าง ... เราใช้มันในงานของฉันและฉันก็ไม่ชอบจริงๆเมื่อใดก็ตามที่ฉันต้องทำการเปลี่ยนแปลงสคริปต์ดังกล่าว
Chris Cirefice

@ChrisCirefice ใช่ไม่ - ภาษานี้มีบางส่วนที่น่ารำคาญไป เช่นปริมาณระบบปริมาณ
Addison Crump

13

Mathematica + coreutils, 20 ไบต์

<<"!date +%m.%d%y"#&

โชคดีที่ Mathematica ตีความเอาท์พุทของคำสั่งภายนอกเป็นการแสดงออก ในกรณีนี้เอาต์พุตเป็นทศนิยมที่ถูกต้องดังนั้นการคูณด้วยอาร์กิวเมนต์ฟังก์ชัน#จะถูกบอกเป็นนัย


นั่นเป็นส่วนผสมที่ฉันไม่รู้ว่ามีอยู่จริง
CalculatorFeline

12

Lua, 30 27 ไบต์

print(...*os.date"%m.%d%y")

คูณอาร์กิวเมนต์บรรทัดคำสั่งครั้งแรกโดยวันที่ปัจจุบันในรูปแบบที่เป็นจริงmm.ddyy03.1416


9

Bash + bc, 25 20 ไบต์

date +%m.%d%y\*$1|bc

ขอบคุณmanatworkสำหรับการบันทึกห้าไบต์

การใช้งาน:

$ ./pi-round.sh 3
9.4248

สัญกรณ์ที่นี่ - สตริงยาวมาก:date +%m.%d%y\*$1|bc
จัดการ

@ งานที่คุณทำถูกต้อง! ฉันเล่นด้วยตัวเอง แต่ไม่สามารถหาวิธีรวมมันเข้าด้วยกันได้ ขอบคุณ!
andlrc

6

PowerShell v2 +, 46 28 25 ไบต์

$args[0]*(Date -F "M.dy")

ตรงไปตรงมาสวย นำเข้า$args[0]และคูณด้วยวันที่จัดรูปแบบเป็นM.dy ( Get-โดยนัย) โปรดทราบว่าการดำเนินการนี้อาจใช้เวลานานในการรันบน v2 เนื่องจากจะวนซ้ำการทดแทนที่เป็นไปได้สำหรับDate(เช่นการตรวจสอบ%PATH%ตัวแปรสภาพแวดล้อมของคุณเป็นต้น) ก่อนที่จะGet-Dateเริ่มดำเนินการ


คุณช่วยลดพื้นที่ได้-fไหม?
ต้มตุ๋น

1
@ Briantist น่าเศร้าไม่ใช่ที่นี่ เรากำลังทำร้ายจดจำรูปแบบของ PowerShell -Formatตั้งแต่ธงที่เกิดขึ้นจริง มีธงเช่นนี้คุณเพียงแค่ต้องโปร่งใส (ตัวอย่างเช่นถ้าคุณมี-Debugและ-Delimiterเป็นตัวเลือกที่มีศักยภาพที่คุณจะต้องไม่น้อยกว่าสามตัวอักษรที่แตกต่าง) การลบช่องว่างหมายถึง PowerShell พยายามแยกวิเคราะห์ธง-F"M.dy"แต่ไม่สามารถหาข้อโต้แย้งที่ตรงกันได้และเกิดข้อผิดพลาดขึ้น
AdmBorkBork

อ่าฉันเห็นแล้วตอนนี้ นั่นคือสิ่งที่ฉันได้รับจากการอ่านบนรถไฟหลังจากวันที่ยาวนาน ฉันตีความมันเป็น-fโอเปอเรเตอร์ ทำให้ความรู้สึกทั้งหมดในขณะนี้
ต้มตุ๋น

6

R 3.2.4, 55 51 47 ไบต์

แก้ไขฉันรู้ว่าฉันสามารถใช้scanขอบคุณ @FryAmTheEggMan ลดลง 4 ไบต์ด้วย @MickyT

scan()*as.numeric(format(Sys.Date(),'%m.%d%y'))

ความพยายามครั้งแรกที่สนามกอล์ฟ สุขสันต์วันปี่!


1
ยินดีต้อนรับสู่ PPCG :) ฉันไม่ใช่โปรแกรมเมอร์ R แต่คุณไม่จำเป็นต้องใส่ฟังก์ชั่นที่กำหนดชื่อเพียงแค่นิพจน์ที่ประเมินผลไปยังฟังก์ชั่น f=ดังนั้นผมค่อนข้างมั่นใจว่าคุณสามารถวาง
FryAmTheEggman

2
คุณสามารถไปได้ไกลกว่าและทำscan()*as.numeric(format(Sys.Date(),'%m.%d%y'))
MickyT

2
as.doubleแทนที่จะas.numericบันทึกไบต์เพิ่มเติม
Flounderer


5

Pyth, 19 ไบต์

*Qvs[.d4\..d5>2`.d3

ลองที่นี่!
ทำงานได้แน่นอนที่ 2016-03-14

คำอธิบาย

* Qvs [.d4 \ .. d5> 2`.d3 # Q = อินพุต

     .d4 # เดือนปัจจุบัน
        \ # dot ระหว่างเดือนและวัน
          .d5 # วันที่ปัจจุบันของเดือน
             > 2`.d3 # 2 หลักสุดท้ายของปี
   s [# concat ทุกอย่างลงในสตริง
  v # eval -> แปลงเป็นลอย
* Q # ทวีคูณด้วยอินพุตเพื่อให้ได้เส้นรอบวง

5

PHP, 45 26 25 24 ไบต์

ใช้การเข้ารหัส Windows-1252

<?=$argv[1]*date(~‘Ñ•†);

ทำงานแบบนี้:

echo '<?=$argv[1]*date(~‘Ñ•†);' | php -- 3
  • บันทึก 19 ไบต์โดยใช้date()แทนDateTime::format
  • บันทึกไบต์โดยใช้แท็ก echo
  • บันทึกเป็นไบต์โดยใช้การเข้ารหัส ISO-8859 และคัดค้านสตริงรูปแบบดังนั้นไม่จำเป็นต้องมีเครื่องหมายคำพูดคู่ อาจทำให้เครื่องของคุณสับสนเล็กน้อยเมื่อเรียกใช้จาก CLI แต่ได้ผล

หากคุณถือว่า register_globals เป็นจริงคุณสามารถใช้$nผ่านทาง/?n=3url
Martijn

@Martijn ที่ต้องการ PHP 4.1 หรือการตั้งค่าโดยใช้php.iniไฟล์ Aross กล่าวก่อนหน้านี้ว่าต้องการที่จะหลีกเลี่ยงวิธีการดังกล่าว
Ismael Miguel

4

Python 2, 58 ตัวอักษร

import time
print float(time.strftime("%m.%d%y"))*input()

ลองมัน!

คำอธิบาย:

import time                                   # Import time time module
print                                         # Print the following
      float(                                  # Cast to float
            time.strftime("%m.%d%y"))         # Format the time as MM.DDYY
                                     *input() # Multiply by input

4

JavaScript, 41 39 ตัวอักษร

นี้ใช้ที่เป็นกรรมสิทธิ์ของFirefox เท่านั้นวิธีการ

d=>new Date().toLocaleFormat`%m.%d%y`*d

ขอบคุณที่:

  • Ismael Miguelสำหรับการแนะนำสตริงแม่แบบ (-2 ตัวอักษร)

ตัวอย่างการรัน (Firefox Web Console):

> (d=>new Date().toLocaleFormat`%m.%d%y`*d)(3)
9.4248

หมายเหตุ: สิ่งนี้จะล้มเหลวใน Firebug Console ดูเหมือนว่า Firebug ทำการขยายตัวบางอย่างในสตริงแม่แบบเปลี่ยน`%m.%d%y`เป็น`%__fb_scopedVars(m).d%y`ก่อนส่งผ่านไปยังรหัส


1
-2 ไบต์:d=>new Date().toLocaleFormat`%m.%d%y`*d
Ismael Miguel

โอ้ [facepalm] ไม่รู้ว่าทำไมฉันมักจะลืมกลอุบายนั้น แม้ว่าฉันจะใช้สตริงแม่แบบเป็นประจำ
จัดการ

ฉันรู้ว่า. ฉันเองก็ไม่ได้เช่นกัน สิ่งที่ฉันพยายามจะหาคือวิธีลบสิ่งนั้นออกnewจากที่นั่น
Ismael Miguel

ฉันลองใน Firefox และใช้งานได้ดี ฉันคัดลอกวางจากคอนโซล เนื่องจากฉันแทนที่('...')ด้วย backticks 2 อันนั่นคือ 2 ไบต์
Ismael Miguel



2

Vitsy + coreutils ขนาด 19 ไบต์

'y%d%.m%+ etad',W*N

คำอธิบาย:

'y%d%.m%+ etad',W*N
'y%d%.m%+ etad'       Push 'date +%m.%d%y' to the stack.
               ,      Execute as shell.
                W     Grab input from STDIN and eval it.
                 *    Multiply the top two items
                  N   Output as a number.

ไม่สามารถเรียกใช้ในเซฟโหมดเนื่องจากจะใช้วิธีการบริหารของ Runtime


2

SpecBASขนาด 39 ไบต์

1 INPUT n: ?n*VAL DATE$(TIME,"mm.ddyy")

ไม่มีอะไรผิดปกติ จัดรูปแบบวันที่เป็นสตริงแล้วคูณอินพุตด้วยVAL(ค่า) ของสตริงนั้น


ลิงค์ล่าม / คอมไพเลอร์?
แมว


ฉันได้แก้ไขลิงก์นี้ให้เป็นคำตอบของคุณ
cat

2

Oracle 11g, 50 49 bytes

SELECT &n*to_char(sysdate,'MM.DDYY')FROM dual;

หนึ่งไบต์ที่น้อยกว่าต้องขอบคุณ @MickyT


คุณสามารถปล่อยพื้นที่ก่อนFROM
MickyT

2

Python 3, 74 54 ไบต์

ใช้โมดูลเวลาแทนวันที่และเวลาเช่นคำตอบของ Loovjo

import time
lambda n:n*float(time.strftime('%m.%d%y'))

ทางออกก่อนหน้า

from datetime import*
lambda n:n*float(datetime.now().strftime('%m.%d%y'))

2
@Zenadix ฉันทามติ metaคือฟังก์ชั่นที่ไม่มีชื่อก็โอเค
FryAmTheEggman

2

Google ชีตขนาด 13 ไบต์

ไบต์ถูกคำนวณด้วยหนึ่งไบต์ต่ออักขระศูนย์ไบต์ต่อเซลล์ยกเว้นเซลล์อินพุตที่กำหนดสองไบต์ เครื่องหมายเท่ากับเพื่อเริ่มสูตรจะไม่ถูกนับ (ฉันไม่รู้ว่านี่เป็นมาตรฐานหรือไม่โปรดแก้ไขให้ฉันถ้าฉันผิด)

เรียกใช้ส่วนย่อยเพื่อดูรหัส

table {
  empty-cells: show;
}
table,
th,
td {
  border: 1px solid black;
}
<table border="1">
  <tr>
    <th></th>
    <th>1</th>
    <th>2</th>
    <th>3</th>
  </tr>
  <tr>
    <td>A</td>
    <td>&lt;input></td>
    <td style="text-align:right">3.1416</td>
    <td style="font-family:'Ubuntu Mono',monospace">=<span style="color:rgb(257,142,29)">A1</span>*<span style="color:rgb(126,55,148)">A2</span>
    </td>
  </tr>
</table>

สิ่งนี้ทำงานได้เพราะคุณสามารถกำหนดรูปแบบวันที่ของคุณเองใน Google ชีต <month>.<day><year>ฉันทำมันเพื่อให้มันเป็น


คุณอาจต้องการถามเมตาเกี่ยวกับระบบการให้คะแนนนี้ ; P
Addison Crump

จะทำอย่างไรเมื่อฉันมีเวลา (อาจจะคืนนี้ในรัฐแมรี่แลนด์)
OldBunny2800

2

Pyke , 16 15 ไบต์, การเข้ารหัส ASCII

C867wä%J"bT4^/*

คำอธิบาย:

C867            - b,c,d = year, day, month
    wä          - a = base_96("ä") - 100
      %         - a = a%b
       J"       - a = "".join([a,c,d])
         b      - b = base(a, 10)
          T4^   - a = 10^4
             /  - a = a/b
              * - imp_print(a*eval_or_not(input))

หรือ 11 ไบต์ (ไม่ใช่การแข่งขัน), (เพิ่มสตริงเดี่ยว 2 หลักปีรวมสตริง)

C856\.R3sb*

คำอธิบาย:

C856        - a,b,c = 2d_year, day, month
    \.      - d = "."
      R3    - a,b,c = b,c,a
        s   - a = sum(a,b,c)
         b  - a = base(a, 10)
          * - imp_print(a*eval_or_not(input))

ฉันเดาว่านี่เป็น Pyke ที่แตกต่างจากpyke.sourceforge.netหรือไม่? คุณสามารถโพสต์ลิงค์ไปยังข้อกำหนดภาษาได้หรือไม่?
Robert Fraser


เพียงแค่สงสัยว่า Pyke ใช้การเข้ารหัสอะไร ถ้าเป็น UTF-8 นี่คือ 16 ไบต์
OldBunny2800

1
@ OldBunny2800 มันไม่สำคัญหรอก ในกรณีนี้มันใช้ ascii แบบเก่าที่ดีเพราะคะแนนโค้ดทั้งหมดต่ำกว่า 255 ตามmeta.codegolf.stackexchange.com/a/5879/32686คำตอบสามารถกำหนดการเข้ารหัสของตัวเองได้โดยไม่มีค่าใช้จ่าย
Blue

1

JavaScript ES6, 68 66 ไบต์

บันทึก 2 ไบต์ต้องขอบคุณ dev-null!

x=>x*((a=new Date).getMonth()+1+"."+a.getDate()+(a.getYear()-100))

ฟังก์ชั่นไม่ระบุชื่อ การใช้งานบางอย่าง:

f(1)    == 3.1416
f(5)    == 15.708
f(f(2)) == 19.73930112

1
คุณควรลองใช้with
Ismael Miguel

1

Tcl / Tk, 58 ไบต์

puts [expr {[gets stdin]*[clock f [clock se] -f %N.%d%g]}]

(นั่นเป็นโปรแกรมที่สมบูรณ์ถ้าคุณต้องการที่จะโกงและลบputsคำสั่งที่ชัดเจนแล้วมันมีเพียง 51 ไบต์ - คุณจะต้องเริ่ม tclsh และพิมพ์ / วางต่อไปนี้โดยตรง :)

expr {[gets stdin]*[clock f [clock se] -f %N.%d%g]}


1

แร็กเก็ต 112 ตัว

(define d(seconds->date(current-seconds)))(*(read)(+(date-month d)(*(date-day d).01)(*(-(date-year d)2e3)1e-4)))

อ่านตัวเลขจากอินพุตในไวยากรณ์ตัวอ่านมาตรฐาน


1

พื้นฐาน TI-84, 30 ไบต์

ทำงานบนเครื่องคิดเลข TI-83/84; E คือโทเค็นสัญลักษณ์ทางวิทยาศาสตร์และ ~ เป็นโทเค็นเชิงลบ

Prompt D:getDate:D(Ans(2)+E~4Ans(1)-.2+.01Ans(3

กรณีทดสอบ

D=?3
          9.4248



1

TI-BASIC, 16 13 9 ไบต์

Xround(π,1+min(getDate

เราปัดเศษ πทศนิยมเป็นจำนวนเท่ากับค่าต่ำสุด{month,day,year}แล้วคูณด้วยอินพุต

นี่คือฟังก์ชั่นที่รับอินพุตผ่าน X จัดเก็บลงในตัวแปร Y ตัวใดตัวหนึ่งY1จากนั้นเรียกใช้เหมือนY1([number])บนหน้าจอหลัก


ดูเหมือนจะมีความขัดแย้งที่Ansอนุญาตให้ป้อนข้อมูลผ่าน
AdmBorkBork

ขนาด 13 ไบต์เป็นอย่างไร ไม่นับอินพุท A ฉันนับ 22 ตัวอักษร
OldBunny2800

1
@ OldBunny2800 TI-BASIC นั้นใช้โทเค็นโดยแต่ละอะตอมจะแสดงเป็นหนึ่งหรือสองไบต์
อดัม

@ OldBunny2800 หน้ารหัสคือที่นี่
lirtosiast

1

APL , 19 ไบต์

⎕×0.01⊥⌽⍎2⌽8↑2↓⍕⎕TS

⎕TSเป็น2016 3 14 12 34 56 789เช่น 14 มีนาคมRD 2016 ขวาก่อน 12:35
ทำให้เป็นสตริงคือ'2016 3 14 12 34 56 789'
8↑2↓ลดลงสองครั้งแรก ( '20') แล้วใช้ต่อไปแปด ( '16 3 14 ')
2⌽หมุนตัวละครทั้งสองให้' 3 14 16'
การแต่งหน้าเป็นตัวเลข ( 3 14 16)
กลับรายการให้16 14 3
0.01⊥ประเมินในฐาน¹/₁₀₀ , = 16 ×0.01² + 15 ×0.01¹ + 3 ×0.01⁰ = 0.0016 + 0.15 + 3 = 3.1416
⎕×คูณด้วยอินพุต

หรือ

⎕×1E¯4⊥⌽⍎2⌽7↑2↓⍕⎕TS

⎕TSเป็น2016 3 14 12 34 56 789เช่น 14 มีนาคมRD 2016 ขวาก่อน 12:35
ทำให้เป็นสตริงคือ'2016 3 14 12 34 56 789'
7↑2↓ลดลงสองครั้งแรก ( '20') แล้วใช้ต่อไปเจ็ด ( '16 3 14')
2⌽หมุนตัวละครทั้งสองให้' 3 1416'
การแต่งหน้าเป็นตัวเลข ( 3 1416)
กลับรายการให้1416 3
1E¯4⊥ประเมินในฐาน¹/ ₁₀₀₀₀, = 1416 ×0.01¹ + 3 ×0.01⁰ = 0.1416 + 3 = 3.1416
⎕×คูณด้วยอินพุต


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

1
@ OldBunny2800 ชัดเจนไหม
อดัม

ใช่ขอบคุณ แต่ใน UTF-8 มีขนาด 38 ไบต์
OldBunny2800


1
@ OldBunny2800 APL ใช้หน้ารหัสของตัวเอง - อักขระเหล่านี้แต่ละตัวมีขนาดหนึ่งไบต์ (นี่คือก่อนที่ ASCII จะคำนึงถึงคุณ ... )
สปาเก็ตตี้
โดยการใช้ไซต์ของเรา หมายความว่าคุณได้อ่านและทำความเข้าใจนโยบายคุกกี้และนโยบายความเป็นส่วนตัวของเราแล้ว
Licensed under cc by-sa 3.0 with attribution required.