ตัวเลขเดดฟิชสั้น


28

Deadfishเป็นหนึ่งในภาษาโปรแกรมทัวริงที่สมบูรณ์แบบที่รู้จักกันดี มีเพียงหนึ่งตัวสะสม (ซึ่งเริ่มต้นที่ 0) เพื่อเก็บข้อมูลและมีเพียงสี่คำสั่ง:

i - Increment the accumulator
s - Square the accumulator
d - Decrement the accumulator
o - Output the accumulator

โปรแกรม Deadfish อาจมีลักษณะดังนี้:

iiisdo

และนั่นจะพิมพ์:

8

ความท้าทาย

สร้างโปรแกรมที่จะใส่ตัวเลขและเอาท์พุทรหัส Deadfish เพื่อแสดงตัวเลข (หรือสร้างฟังก์ชั่นที่ใช้ตัวเลขเป็นพารามิเตอร์และส่งคืนรหัส) มันจะต้องทำงานกับจำนวนเต็มใด ๆ จาก0ถึง255

เป้าหมาย

พยายามทำให้รหัสของคุณสั้นที่สุดเพื่อสร้างรหัสที่กำหนด ตัวอย่างเช่น:

iiiiiiiiio

และ

iiiso

แต่ละการพิมพ์9แต่ครั้งที่สองจะสั้นกว่า

เกณฑ์การให้คะแนน

คะแนนของคุณคือ:

The number of characters in your source code +
The sum of the lengths of your output for all numbers from 1-255
-100 if the language you chose is Deadfish :)

คะแนนต่ำสุดชนะ!


ในความท้าทายเริ่มต้นฉันมีเพียงจำนวนรวม 6 หมายเลข (9,17,99,100 และ 123) นี่คือจากฉันต้องการที่จะไม่ทำให้ทุกคนทดสอบสำหรับทุกหมายเลขและฉันต้องการรหัสสั้นที่สุดที่จะเกี่ยวข้อง จากนั้นฉันก็รู้ว่าโปรแกรมเมอร์ทำสคริปต์ได้ดีเพื่อทดสอบสิ่งต่าง ๆ เช่นนี้และฉันอยากจะมีการแข่งขันสำหรับอัลกอริทึมที่ดีที่สุดกับการเล่นกอล์ฟเป็น tiebreaker

ดังนั้นฉันจึงเปลี่ยนสิ่งนี้ตามที่ Martin Büttnerแนะนำ


1
เป็นไปได้ที่จะทำสิ่งนี้ใน Deadfish หากไม่มีการป้อนข้อมูล?
งานอดิเรกของ Calvin

2
@ Calvin'sHobbies ฉันไม่คิดว่าทุกคนเริ่มที่ -100 :)
MegaTom


1
เดดฟิชจัดการกับจำนวนเต็มมากกว่า 255 หรือไม่? เช่นเราสามารถคำนวณ 256 และลบได้หรือไม่ มีการจัดการมากเกินไปอย่างไร เป็น16^2 = 0หรือ16^2 = 256หรือ16^2 = error ?
soktinpk

1
@soktinpk ถ้าคุณกด-1หรือแล้วจะได้รับการตั้งค่า256 0แต่ถ้าคุณกดตัวเลขขนาดใหญ่กว่า256โดย squaring 17^2 = 289แล้วก็ไม่เปลี่ยนแปลงเช่น (ดูหน้า esolang)
Sp3000

คำตอบ:


3

Perl, 132 131 ไบต์ + 2036 ไบต์ = 2167

รวมถึง +2 สำหรับ -lp

เรียกใช้ด้วยหมายเลขเป้าหมายใน STDIN เช่น

perl -lp deadfish.pl <<< 160

deadfish.pl:

@;=map{s%(o)|(s)|(i|d)|%$_-=e cmp$3.e;$_*=$_-16&&$_ if$2;$1&&$_%eg;@$_=$`;grep/id|di/^y/o//<4,<{o,s,d,i}$`>}~~o,@;until$\="@$_"}{

grep เป็นตัวกรองเพื่อ จำกัด การระเบิดแบบเอ็กซ์โปเนนเชียลเล็กน้อย (แม้ว่าโปรแกรมนี้ยังต้องการความจุ 2 GB สำหรับเคสแข็ง) มันใช้งานได้ แต่ไม่สามารถใช้งานบนฮาร์ดแวร์ของฉันแบบนั้นได้ยกเว้นกรณีง่าย ๆ แต่โดยหลักการแล้ว110=108+2โปรแกรมไบต์นี้ก็ทำงานเช่นกัน:

@;=map{s%(o)|(s)|(i|d)|%$_-=e cmp$3.e;$_*=$_-16&&$_ if$2;$1&&$_%eg;@$_=$`;<{o,s,d,i}$`>}$a,@;until$\="@$_"}{

รายการเอาท์พุท:

1   io
2   iio
3   iiio
4   iiso
5   iisio
6   iisiio
7   iisiiio
8   iiisdo
9   iiiso
10  iodo
11  ioo
12  ioio
13  ioiio
14  ioiso
15  ioisio
16  iisso
17  iissio
18  iissiio
19  ioiiso
20  iioddo
21  iiodo
22  iioo
23  iioio
24  iioso
25  iiosio
26  iiosiio
27  iiosiiio
28  iioisdo
29  iioiso
30  iiiodddo
31  iiioddo
32  iiiodo
33  iiioo
34  iiioio
35  iiioiio
36  iisiiso
37  iisiisio
38  iiiosdo
39  iiioso
40  iisosso
41  iisossio
42  iisoddo
43  iisodo
44  iisoo
45  iisoio
46  iisoiio
47  iisoiiio
48  iisodsdo
49  iisodso
50  iisiiisio
51  iisiiisiio
52  iisiodddo
53  iisioddo
54  iisiodo
55  iisioo
56  iisioio
57  iisioiio
58  iisioiiio
59  iisioddso
60  iiisdsddddo
61  iiisdsdddo
62  iiisdsddo
63  iiisdsdo
64  iiisdso
65  iiisdsio
66  iisiioo
67  iisiioio
68  iisiioiio
69  iisiioiiio
70  iiisdsiiiiiio
71  iiisdsiiiiiiio
72  iisiiiodddddo
73  iisiiioddddo
74  iisiiiodddo
75  iisiiioddo
76  iisiiiodo
77  iisiiioo
78  iisiiioio
79  iiissddo
80  iiissdo
81  iiisso
82  iiissio
83  iiissiio
84  iiissiiio
85  iiissiiiio
86  iiisdoddo
87  iiisdodo
88  iiisdoo
89  iiisdoio
90  iiisodddddsso
91  iiisodddddssio
92  iiisodddddddo
93  iiisoddddddo
94  iiisodddddo
95  iiisoddddo
96  iiisodddo
97  iiisoddo
98  iiisodo
99  iiisoo
100 iodoo
101 iodoio
102 iodoiio
103 iodoiiio
104 iodoiiso
105 iodoiisio
106 iodoiisiio
107 iiisiodddo
108 iiisioddo
109 iiisiodo
110 ioodo
111 iooo
112 iooio
113 iooiio
114 iooiso
115 iooisio
116 ioisso
117 ioissio
118 ioissiio
119 iooiiso
120 ioioddo
121 ioiodo
122 ioioo
123 ioioio
124 ioioso
125 ioiosio
126 ioiosiio
127 ioiosiiio
128 ioioisdo
129 ioioiso
130 ioiiodddo
131 ioiioddo
132 ioiiodo
133 ioiioo
134 ioiioio
135 ioiioiio
136 ioisiiso
137 ioisiisio
138 ioiiosdo
139 ioiioso
140 ioisosso
141 ioisossio
142 ioisoddo
143 ioisodo
144 ioisoo
145 ioisoio
146 ioisoiio
147 ioisoiiio
148 ioisodsdo
149 ioisodso
150 iissdoiso
151 iissdoisio
152 ioisiodddo
153 ioisioddo
154 ioisiodo
155 ioisioo
156 ioisioio
157 ioisioiio
158 ioisioiiio
159 ioisioddso
160 iissoso
161 iissosio
162 iissosiio
163 ioiisdsdo
164 ioiisdso
165 ioiisdsio
166 ioisiioo
167 ioisiioio
168 ioisiioiio
169 iissdddso
170 iissiodso
171 iissiodsio
172 iissiodsiio
173 iissiodsiiio
174 ioisiiiodddo
175 ioisiiioddo
176 ioisiiiodo
177 ioisiiioo
178 ioisiiioio
179 ioiissddo
180 ioiissdo
181 ioiisso
182 ioiissio
183 ioiissiio
184 ioiissiiio
185 ioiissiiiio
186 ioiisdoddo
187 ioiisdodo
188 ioiisdoo
189 ioiisdoio
190 iissiiiodddso
191 iissddsdddddo
192 iissddsddddo
193 iissddsdddo
194 iissddsddo
195 iissddsdo
196 iissddso
197 iissddsio
198 ioiisodo
199 ioiisoo
200 iioddoo
201 iioddoio
202 iioddoiio
203 iioddoiiio
204 iioddoiiso
205 iioddoiisio
206 iioddoiisiio
207 iioddoiisiiio
208 iioddoiiisdo
209 iioddoiiiso
210 iioisio
211 iiodoo
212 iiodoio
213 iiodoiio
214 iiossddo
215 iiossdo
216 iiosso
217 iiossio
218 iiossiio
219 iiossiiio
220 iiooddo
221 iioodo
222 iiooo
223 iiooio
224 iiooso
225 iioosio
226 iioosiio
227 iioosiiio
228 iiooisdo
229 iiooiso
230 iioiodddo
231 iioioddo
232 iioiodo
233 iioioo
234 iioioio
235 iioioiio
236 iiosiiso
237 iiosiisio
238 iioiosdo
239 iioioso
240 iiososso
241 iiosossio
242 iiosoddo
243 iiosodo
244 iiosoo
245 iiosoio
246 iiosoiio
247 iiosoiiio
248 iiosodsdo
249 iiosodso
250 iiosiiisio
251 iiosiiisiio
252 iiosiodddo
253 iiosioddo
254 iiosiodo
255 iiosioo

9

ES6 JavaScript 2126 + 311 = 2437 คะแนน

m=Math;s=n=>[b=m.min(m.sqrt(n)+.5|0,15),n-b*b];f=n=>(n<0?'d':'i').repeat(m.abs(n));g=(n,t)=>n<4?f(n):g((t=s(n))[0])+'s'+f(t[1]);q=n=>((x=g(n)).length>(z=[...n+''].map((k,i,a)=>i?(a[i-1]==a[i]?'':(y=f((l=s(k))[0]-a[i-1])+(l[0]?'s':'')+f(l[1])).length>m.abs(Q=a[i]-a[i-1])?f(Q):y):g(k)).join('o')).length?z:x)+'o'

กึ่งแสดงความคิดเห็น:

m = Math; // Keep a reference to math
// This function returns the closest perfect square and the distance from that square to the number
// E.g. s(10) --> [3, 1] because 3^2 + 1 = 10
s = n => [b = m.min(m.sqrt(n) + .5 | 0, 15), n - b * b];
// This creates a bunch of "d"s or "i"s
// E.g. f(3) --> "iii" or f(-2) --> "dd"
f = n => Array(m.abs(n) + 1).join(n < 0 ? 'd' : 'i');
// This constructs the number as a number rather than by digit
g = (n, t) => n < 4 ? 
              // If n is less than 4, then we can just increment in normally (base case)
              f(n) : 
              // Otherwise, build the square root recursively and shift
              g((t = s(n))[0]) + 's' + f(t[1]);
// This maps based on digits (constructs the number by digit)
// This has now been removed and replaced inline because it is only used once
d = n => (a = [...(n + '')]).map((k, i) => i ? (a[i - 1] == a[i] ? '' : f((l = s(k))[0] - a[i - 1]) + (l[0] ? 's' : '') + f(l[1])) : g(k)).join('o');
// For the official function, compare the digit-method and nondigit-method and return the best one
q = n => ((x = g(n)).length > (z = d(n)).length ? z : x) + 'o'

สิ่งนี้ใช้ประโยชน์จากข้อเท็จจริงที่ว่าในเดดฟิชคุณสามารถพิมพ์อักขระได้มากกว่าหนึ่งตัว

ตัวอย่าง: 10คอมไพล์ถึงiodoซึ่งเป็น "print one, decrement, print zero"

การใช้งาน:

q(10) // --> iodo
q(16) // --> iisso

นี่คือข้อมูลการส่งออก json:

{
    "0": "o",
    "1": "io",
    "2": "iio",
    "3": "iiio",
    "4": "iiso",
    "5": "iisio",
    "6": "iisiio",
    "7": "iiisddo",
    "8": "iiisdo",
    "9": "iiiso",
    "10": "iodo",
    "11": "ioo",
    "12": "ioio",
    "13": "ioiio",
    "14": "ioiso",
    "15": "iissdo",
    "16": "iisso",
    "17": "iissio",
    "18": "iissiio",
    "19": "ioiiso",
    "20": "iioddo",
    "21": "iiodo",
    "22": "iioo",
    "23": "iioio",
    "24": "iioso",
    "25": "iisiso",
    "26": "iisisio",
    "27": "iisisiio",
    "28": "iioisdo",
    "29": "iioiso",
    "30": "iiiodddo",
    "31": "iiioddo",
    "32": "iiiodo",
    "33": "iiioo",
    "34": "iiioio",
    "35": "iiioiio",
    "36": "iisiiso",
    "37": "iisiisio",
    "38": "iiiosdo",
    "39": "iiioso",
    "40": "iisoddddo",
    "41": "iisodddo",
    "42": "iisoddo",
    "43": "iisodo",
    "44": "iisoo",
    "45": "iisoio",
    "46": "iisoiio",
    "47": "iisoiiio",
    "48": "iisodsdo",
    "49": "iisodso",
    "50": "iiisddsio",
    "51": "iiisddsiio",
    "52": "iisiodddo",
    "53": "iisioddo",
    "54": "iisiodo",
    "55": "iisioo",
    "56": "iisioio",
    "57": "iisioiio",
    "58": "iisioiiio",
    "59": "iisioddso",
    "60": "iiisdsddddo",
    "61": "iiisdsdddo",
    "62": "iiisdsddo",
    "63": "iiisdsdo",
    "64": "iiisdso",
    "65": "iiisdsio",
    "66": "iisiioo",
    "67": "iisiioio",
    "68": "iisiioiio",
    "69": "iisiioiiio",
    "70": "iiisdsiiiiiio",
    "71": "iiisdsiiiiiiio",
    "72": "iiisddodddddo",
    "73": "iiisddoddddo",
    "74": "iiisddodddo",
    "75": "iiisddoddo",
    "76": "iiisddodo",
    "77": "iiisddoo",
    "78": "iiissdddo",
    "79": "iiissddo",
    "80": "iiissdo",
    "81": "iiisso",
    "82": "iiissio",
    "83": "iiissiio",
    "84": "iiissiiio",
    "85": "iiissiiiio",
    "86": "iiisdoddo",
    "87": "iiisdodo",
    "88": "iiisdoo",
    "89": "iiisdoio",
    "90": "iiissiiiiiiiiio",
    "91": "iiisoddddddddo",
    "92": "iiisodddddddo",
    "93": "iiisoddddddo",
    "94": "iiisodddddo",
    "95": "iiisoddddo",
    "96": "iiisodddo",
    "97": "iiisoddo",
    "98": "iiisodo",
    "99": "iiisoo",
    "100": "iodoo",
    "101": "iodoio",
    "102": "iodoiio",
    "103": "iodoiiio",
    "104": "iodoiiso",
    "105": "iodoiisio",
    "106": "iodoiisiio",
    "107": "iodoiiisddo",
    "108": "iodoiiisdo",
    "109": "iodoiiiso",
    "110": "ioodo",
    "111": "iooo",
    "112": "iooio",
    "113": "iooiio",
    "114": "iooiso",
    "115": "iooisio",
    "116": "iooisiio",
    "117": "iooiisddo",
    "118": "iooiisdo",
    "119": "iooiiso",
    "120": "ioioddo",
    "121": "ioiodo",
    "122": "ioioo",
    "123": "ioioio",
    "124": "ioioso",
    "125": "ioiosio",
    "126": "ioiosiio",
    "127": "ioioisddo",
    "128": "ioioisdo",
    "129": "ioioiso",
    "130": "ioiiodddo",
    "131": "ioiioddo",
    "132": "ioiiodo",
    "133": "ioiioo",
    "134": "ioiioio",
    "135": "ioiioiio",
    "136": "ioiioiiio",
    "137": "ioiiosddo",
    "138": "ioiiosdo",
    "139": "ioiioso",
    "140": "ioisoddddo",
    "141": "ioisodddo",
    "142": "ioisoddo",
    "143": "ioisodo",
    "144": "ioisoo",
    "145": "ioisoio",
    "146": "ioisoiio",
    "147": "ioisoiiio",
    "148": "ioisodsdo",
    "149": "ioisodso",
    "150": "ioisiodddddo",
    "151": "ioisioddddo",
    "152": "ioisiodddo",
    "153": "ioisioddo",
    "154": "ioisiodo",
    "155": "ioisioo",
    "156": "ioisioio",
    "157": "ioisioiio",
    "158": "ioisioiiio",
    "159": "ioisioddso",
    "160": "ioisiioddddddo",
    "161": "ioisiiodddddo",
    "162": "ioisiioddddo",
    "163": "ioisiiodddo",
    "164": "ioisiioddo",
    "165": "ioisiiodo",
    "166": "ioisiioo",
    "167": "ioisiioio",
    "168": "iissdddsdo",
    "169": "iissdddso",
    "170": "iissdddsio",
    "171": "iissdddsiio",
    "172": "iissdddsiiio",
    "173": "iissdddsiiiio",
    "174": "ioiisddodddo",
    "175": "ioiisddoddo",
    "176": "ioiisddodo",
    "177": "ioiisddoo",
    "178": "ioiisddoio",
    "179": "ioiisddoiio",
    "180": "ioiisdoddddddddo",
    "181": "ioiisdodddddddo",
    "182": "ioiisdoddddddo",
    "183": "ioiisdodddddo",
    "184": "ioiisdoddddo",
    "185": "ioiisdodddo",
    "186": "ioiisdoddo",
    "187": "ioiisdodo",
    "188": "ioiisdoo",
    "189": "ioiisdoio",
    "190": "iissddsddddddo",
    "191": "iissddsdddddo",
    "192": "iissddsddddo",
    "193": "iissddsdddo",
    "194": "iissddsddo",
    "195": "iissddsdo",
    "196": "iissddso",
    "197": "iissddsio",
    "198": "ioiisodo",
    "199": "ioiisoo",
    "200": "iioddoo",
    "201": "iioddoio",
    "202": "iioddoiio",
    "203": "iioddoiiio",
    "204": "iioddoiiso",
    "205": "iioddoiisio",
    "206": "iioddoiisiio",
    "207": "iioddoiiisddo",
    "208": "iioddoiiisdo",
    "209": "iioddoiiiso",
    "210": "iiododo",
    "211": "iiodoo",
    "212": "iiodoio",
    "213": "iiodoiio",
    "214": "iiodoiso",
    "215": "iiodoisio",
    "216": "iiodoisiio",
    "217": "iiodoiisddo",
    "218": "iiodoiisdo",
    "219": "iiodoiiso",
    "220": "iiooddo",
    "221": "iioodo",
    "222": "iiooo",
    "223": "iiooio",
    "224": "iiooso",
    "225": "iissdso",
    "226": "iissdsio",
    "227": "iissdsiio",
    "228": "iiooisdo",
    "229": "iiooiso",
    "230": "iioiodddo",
    "231": "iioioddo",
    "232": "iioiodo",
    "233": "iioioo",
    "234": "iioioio",
    "235": "iioioiio",
    "236": "iioioiiio",
    "237": "iioiosddo",
    "238": "iioiosdo",
    "239": "iioioso",
    "240": "iiosoddddo",
    "241": "iiosodddo",
    "242": "iiosoddo",
    "243": "iiosodo",
    "244": "iiosoo",
    "245": "iiosoio",
    "246": "iiosoiio",
    "247": "iiosoiiio",
    "248": "iiosodsdo",
    "249": "iiosodso",
    "250": "iiosiodddddo",
    "251": "iiosioddddo",
    "252": "iiosiodddo",
    "253": "iiosioddo",
    "254": "iiosiodo",
    "255": "iiosioo"
}

ที่สร้างขึ้นโดยรหัสนี้:

var c = {}, result = 0;
for (var i = 0; i <= 255; ++i) result += (c[i] = q(i)).length;

สิ่งที่พิมพ์result = (the result)และc =สิ่งข้างต้น

นี่เป็นคะแนนที่สูงมากแม้จะค่อนข้างเรียบง่าย มันค้นหาสแควร์ที่สมบูรณ์แบบที่ใกล้ที่สุดคำนวณรากที่สองของสแควร์ที่สมบูรณ์แบบนั้นเพิ่ม 's' และการเพิ่ม / ลดลงอย่างเหมาะสม

เวอร์ชันเก่าซึ่งไม่ได้ใช้ความจริงที่ว่า "10" = "พิมพ์หนึ่งพิมพ์ศูนย์"

m=Math;s=n=>[b=m.sqrt(n)+.5|0,n-b*b];f=(n)=>Array(m.abs(n)+1).join('id'[+(n<0)]);g=(n,t)=>n<4?f(n):g((t=s(n))[0])+'s'+f(t[1]);q=n=>g(n)+'o'

ดูเหมือนว่าคุณจะได้รับผลกระทบจากการที่dไม่ถูกต้องการดำเนินงาน - ถ้ามัน decrements เพื่อ-1จะได้รับการตั้งค่าที่จะไม่0 255
Doorknob

8
ฉันคิดว่าคุณเข้าใจผิดว่าอะไรo; มันส่งออกสะสมและขึ้นบรรทัดใหม่ iodoเอาท์พุทไม่1\n0\n 10
Gabe

3
ไม่ถูกต้องสำหรับตัวเลขจำนวนมาก (เนื่องจาก 256 และ -1 -> 0) ตัวอย่าง 255 iissdo: i: 1, i: 2, s: 4, s: 16, s: 256-> 0, d: -1-> 0, เอาต์พุต 0
edc65

1
@Gabe หน้าวิกิพีเดียสำหรับ Deadfish oไม่ได้พูดถึงว่ามีการขึ้นบรรทัดใหม่จะได้รับการตีพิมพ์เมื่อทำ ไม่มีคอมไพเลอร์จำนวนมาก (ในภาษาที่แตกต่างกัน) พิมพ์บรรทัดใหม่ด้วยo
เครื่องมือเพิ่มประสิทธิภาพ

2
@Optimizer: ฉันคิดว่าบรรทัดใหม่มีนัยยะ ฉันไม่ทราบว่ามี 60 ภาษาทั้งหมดที่มีเวอร์ชันในหน้า wiki แต่ดูเหมือนว่าทุกภาษาที่ฉันสามารถอ่านทำได้: Bash, C (การดำเนินการอ้างอิง), C #, C ++, Clever, C64 พื้นฐาน, Go, Haskell, HTML / JS, Java, Obfuscated C, OCaml, Pascal, Perl, Python, R, Ruby, Rust, Scheme, Seed7, Stackstack, ผู้ประกอบ MagicKit อย่างไม่เป็นทางการ, VB.NET, WTFZOMFG สิ่งสำคัญคือคำตอบนี้สร้างโปรแกรมที่ไม่สามารถใช้งานการอ้างอิงได้
Gabe

5

Mathematica, 254 165 ตัวละคร + 3455 = 3620

f@n_:=n;g@0="";l={f@0=0};h=If[f@#>f@i&&#<256&&#>0,f@#=f@i+1;g@#=g@i<>#2;l~AppendTo~#]&;While[l!={},i=#&@@l;l=Rest@l;h[i+1,"i"];h[i-1,"d"];h[i*i,"s"];];g@Input[]<>"o"

หักกอล์ฟ:

f@n_ := n;
g@0 = "";
l = {f@0 = 0};
h = If[f@# > f@i && # < 256 && # > 0,
    f@# = f@i + 1;
    g@# = g@i <> #2;
    l~AppendTo~#] &;
While[l != {},
  i = # & @@ l;
  l = Rest@l;
  h[i + 1, "i"];
  h[i - 1, "d"];
  h[i*i, "s"];
  ];
g@Input[] <> "o"

ฉันเชื่อว่าตัวเลขที่ได้นั้นดีที่สุด นี่เป็นการค้นหาแบบกว้างครั้งแรกผ่านตัวเลขทั้งหมด 256 รายการติดตามวิธีที่สั้นที่สุดที่พบเพื่อเป็นตัวแทนของแต่ละหมายเลข การค้นหากำลังสร้างตารางการค้นหาเรียงลำดับในฟังก์ชั่นgซึ่งจะนำไปใช้กับอินพุต

สำหรับการอ้างอิงนี่คือ 255 ผลลัพธ์ทั้งหมด:

io
iio
iiio
iiso
iisio
iisiio
iisiiio
iiisdo
iiiso
iiisio
iiisiio
iiisiiio
iissdddo
iissddo
iissdo
iisso
iissio
iissiio
iissiiio
iissiiiio
iissiiiiio
iisisdddo
iisisddo
iisisdo
iisiso
iisisio
iisisiio
iisisiiio
iisisiiiio
iisisiiiiio
iisisiiiiiio
iisiisddddo
iisiisdddo
iisiisddo
iisiisdo
iisiiso
iisiisio
iisiisiio
iisiisiiio
iisiisiiiio
iisiisiiiiio
iisiisiiiiiio
iisiisiiiiiiio
iisiiisdddddo
iisiiisddddo
iisiiisdddo
iisiiisddo
iisiiisdo
iisiiiso
iisiiisio
iisiiisiio
iisiiisiiio
iisiiisiiiio
iisiiisiiiiio
iisiiisiiiiiio
iisiiisiiiiiiio
iiisdsdddddddo
iiisdsddddddo
iiisdsdddddo
iiisdsddddo
iiisdsdddo
iiisdsddo
iiisdsdo
iiisdso
iiisdsio
iiisdsiio
iiisdsiiio
iiisdsiiiio
iiisdsiiiiio
iiisdsiiiiiio
iiisdsiiiiiiio
iiissdddddddddo
iiissddddddddo
iiissdddddddo
iiissddddddo
iiissdddddo
iiissddddo
iiissdddo
iiissddo
iiissdo
iiisso
iiissio
iiissiio
iiissiiio
iiissiiiio
iiissiiiiio
iiissiiiiiio
iiissiiiiiiio
iiissiiiiiiiio
iiissiiiiiiiiio
iiissiiiiiiiiiio
iiisisddddddddo
iiisisdddddddo
iiisisddddddo
iiisisdddddo
iiisisddddo
iiisisdddo
iiisisddo
iiisisdo
iiisiso
iiisisio
iiisisiio
iiisisiiio
iiisisiiiio
iiisisiiiiio
iiisisiiiiiio
iiisisiiiiiiio
iiisisiiiiiiiio
iiisisiiiiiiiiio
iiisisiiiiiiiiiio
iiisisiiiiiiiiiiio
iiisiisdddddddddo
iiisiisddddddddo
iiisiisdddddddo
iiisiisddddddo
iiisiisdddddo
iiisiisddddo
iiisiisdddo
iiisiisddo
iiisiisdo
iiisiiso
iiisiisio
iiisiisiio
iiisiisiiio
iiisiisiiiio
iiisiisiiiiio
iiisiisiiiiiio
iiisiisiiiiiiio
iiisiisiiiiiiiio
iiisiisiiiiiiiiio
iiisiisiiiiiiiiiio
iiisiisiiiiiiiiiiio
iiisiisiiiiiiiiiiiio
iiisiiisddddddddddo
iiisiiisdddddddddo
iiisiiisddddddddo
iiisiiisdddddddo
iiisiiisddddddo
iiisiiisdddddo
iiisiiisddddo
iiisiiisdddo
iiisiiisddo
iiisiiisdo
iiisiiiso
iiisiiisio
iiisiiisiio
iiisiiisiiio
iiisiiisiiiio
iiisiiisiiiiio
iiisiiisiiiiiio
iiisiiisiiiiiiio
iiisiiisiiiiiiiio
iiisiiisiiiiiiiiio
iiisiiisiiiiiiiiiio
iiisiiisiiiiiiiiiiio
iiisiiisiiiiiiiiiiiio
iissdddsddddddddddddo
iissdddsdddddddddddo
iissdddsddddddddddo
iissdddsdddddddddo
iissdddsddddddddo
iissdddsdddddddo
iissdddsddddddo
iissdddsdddddo
iissdddsddddo
iissdddsdddo
iissdddsddo
iissdddsdo
iissdddso
iissdddsio
iissdddsiio
iissdddsiiio
iissdddsiiiio
iissdddsiiiiio
iissdddsiiiiiio
iissdddsiiiiiiio
iissdddsiiiiiiiio
iissdddsiiiiiiiiio
iissdddsiiiiiiiiiio
iissdddsiiiiiiiiiiio
iissdddsiiiiiiiiiiiio
iissddsddddddddddddddo
iissddsdddddddddddddo
iissddsddddddddddddo
iissddsdddddddddddo
iissddsddddddddddo
iissddsdddddddddo
iissddsddddddddo
iissddsdddddddo
iissddsddddddo
iissddsdddddo
iissddsddddo
iissddsdddo
iissddsddo
iissddsdo
iissddso
iissddsio
iissddsiio
iissddsiiio
iissddsiiiio
iissddsiiiiio
iissddsiiiiiio
iissddsiiiiiiio
iissddsiiiiiiiio
iissddsiiiiiiiiio
iissddsiiiiiiiiiio
iissddsiiiiiiiiiiio
iissddsiiiiiiiiiiiio
iissddsiiiiiiiiiiiiio
iissdsdddddddddddddddo
iissdsddddddddddddddo
iissdsdddddddddddddo
iissdsddddddddddddo
iissdsdddddddddddo
iissdsddddddddddo
iissdsdddddddddo
iissdsddddddddo
iissdsdddddddo
iissdsddddddo
iissdsdddddo
iissdsddddo
iissdsdddo
iissdsddo
iissdsdo
iissdso
iissdsio
iissdsiio
iissdsiiio
iissdsiiiio
iissdsiiiiio
iissdsiiiiiio
iissdsiiiiiiio
iissdsiiiiiiiio
iissdsiiiiiiiiio
iissdsiiiiiiiiiio
iissdsiiiiiiiiiiio
iissdsiiiiiiiiiiiio
iissdsiiiiiiiiiiiiio
iissdsiiiiiiiiiiiiiio
iissdsiiiiiiiiiiiiiiio
iissdsiiiiiiiiiiiiiiiio
iissdsiiiiiiiiiiiiiiiiio
iissdsiiiiiiiiiiiiiiiiiio
iissdsiiiiiiiiiiiiiiiiiiio
iissdsiiiiiiiiiiiiiiiiiiiio
iissdsiiiiiiiiiiiiiiiiiiiiio
iissdsiiiiiiiiiiiiiiiiiiiiiio
iissdsiiiiiiiiiiiiiiiiiiiiiiio
iissdsiiiiiiiiiiiiiiiiiiiiiiiio
iissdsiiiiiiiiiiiiiiiiiiiiiiiiio
iissdsiiiiiiiiiiiiiiiiiiiiiiiiiio
iissdsiiiiiiiiiiiiiiiiiiiiiiiiiiio
iissdsiiiiiiiiiiiiiiiiiiiiiiiiiiiio
iissdsiiiiiiiiiiiiiiiiiiiiiiiiiiiiio
iissdsiiiiiiiiiiiiiiiiiiiiiiiiiiiiiio

ฉันไม่แน่ใจว่าฉันชอบให้คะแนนตัวเองมากแค่ไหน ... คุณมีความคิดที่ดีกว่าในการทำอย่างไร
MegaTom

1
@ MegaTom ตามที่ฉันแนะนำในความคิดเห็น: ผลรวมของความยาวของตัวเลขทั้งหมด 256
Martin Ender

ในกรณีนั้นคุณควรคูณจำนวนถ่านด้วย 5 หรืออย่างนั้น มิฉะนั้นจะไม่เกี่ยวข้องเร็ว ๆ นี้
MegaTom

1
@soktinpk ผมอ่าน "ถ้าคุณตีจำนวนขนาดใหญ่กว่า 256 โดย squaring" เป็นไม่ได้n > 256 n ≥ 256และนั่นก็สอดคล้องกับหน้า esolang: "แม้ว่าความคิดเห็นในสถานะการใช้งาน C การ/* Make sure x is not greater then [sic] 256 */ใช้งานจะตั้งค่าเป็นศูนย์ถ้าหากว่าเท่านั้นvalue == -1 || value == 256"
Martin Ender

1
@soktinpk ไม่คุณกำลังกด -1 ด้วยdดังนั้นควรพิมพ์ 0
Martin Ender

5

C, 433 รหัส + 3455 เอาท์พุท = 3888

C ++, 430 code + 3455 output = 3885

และตอนนี้สำหรับสิ่งที่แตกต่างอย่างสิ้นเชิง

ฉันใช้ผลลัพธ์จากคำตอบ Mathematica ของ Martin (อัปเดตเมื่อวันที่ 23 ตุลาคมเพราะมันผิดสำหรับ 240+ ก่อน) ผลลัพธ์ของฉันเหมือนกันคือ 3455 ตัวอักษร ฉันวิเคราะห์รูปแบบในผลลัพธ์และค้นพบว่า [0,255] สามารถแสดงด้วยลำดับนี้:

  1. 0-3 is
  2. 0-2 ss
  3. 0-3 iหรือds
  4. 0-1 ss
  5. 0-14 iหรือ 0-16 ds
  6. 1 o

ขั้นตอนต่อไปคือการสร้างคอลัมน์ทั้งห้านี้อย่างระมัดระวัง ( cผ่านgในโค้ดด้านล่าง) ผมใช้ตัวเลขที่ติดลบจะบ่งบอกdแทนiในคอลัมน์และe gจากนั้นปรากฎว่าผลลัพธ์ส่วนใหญ่ทำงานเหมือนกับตัวนับในgคอลัมน์เนื่องจากแต่ละแถวuมักจะลบหนึ่งdหรือเพิ่มหนึ่งที่iสัมพันธ์กับแถวก่อนหน้า ( v) มีข้อยกเว้น 15 ข้อซึ่งจัดเก็บอยู่ในx(ดัชนี) และb(ห้าคอลัมน์บรรจุเป็นจำนวนเต็มซึ่งต้องการเพียง 14 บิตในการจัดเก็บสูงสุด10832)

ตัวอย่างเช่นครั้งแรกที่ "ยกเว้น" oคือแถวแรกมากที่เราต้องการศูนย์อักขระนอกเหนือจากการยุติ ดังนั้นx[0]เป็น0และb[0]เป็น544ซึ่งเมื่อแตกเป็น ( "endian น้อย" สไตล์ตั้งแต่คอลัมน์นับ)g { 32, 0, 4, 0, 0 }เราจะลบ 32 จากgและ 4 จากเสมอeเพื่อให้บิตฟิลด์ที่ไม่ได้ลงชื่อ (เช่นคอลัมน์สองคอลัมน์นั้นแทนตัวเลขเชิงลบเมื่อdต้องการแทนที่จะเป็นแนวคิดiแต่ในการนำไปใช้ค่าจะถูกชดเชยเพื่อหลีกเลี่ยงตัวเลขลบจริง)

นี่คือตารางที่แสดงว่าตัวเลขสิบตัวแรกทำงานอย่างไร (ช่องว่างคือศูนย์):

n   text    c   d   e   f   g
0   o                   
1   io                      1
2   iio                     2
3   iiio                    3
4   iiso    2   1           
5   iisio   2   1           1
6   iisiio  2   1           2
7   iisiiio 2   1           3
8   iiisdo  3   1          -1
9   iiiso   3   1           

คุณจะเห็นว่าgส่วนใหญ่เพิ่งเพิ่มทีละหนึ่งสำหรับแต่ละแถวใหม่ แต่บางแถว (0, 4, 8, ... ซึ่งฉันหวังว่าจะหาใน OEIS สั้น ๆ ) "รีเซ็ต" ลำดับความหมายgใช้ค่าใหม่และ มีคอลัมน์อื่นอย่างน้อยหนึ่งคอลัมน์ที่ได้รับการแก้ไขเช่นกัน

ไม่รวมนับจำนวนตัวอักษรรหัสช่องว่างยกเว้นการขึ้นบรรทัดใหม่บังคับก่อนแต่ละ#และพื้นที่หลังและunsigned intคุณสามารถบันทึก 3 ตัวอักษรโดยการรวบรวมเป็น C ++ แทน C, แทนที่<stdio.h>ด้วย<cstdio>และมี*(int*)&u(int&)u

#include <stdio.h>

struct { unsigned g:6, f:1, e:3, d:2, c:2; } u;

int
  x[] = { 0,4,8,13,22,32,44,57,72,92,112,134,157,182,210,256 },
  b[] = { 544,9760,13855,9821,9949,10076,10203,13785,13911,14040,14167,14294,10452,10578,10705,10832 };

int main()
{
  int n,i=0,q=0;
  scanf("%d", &n);
  while(i++ <= n) {
    ++u.g;
    if (i > x[q])
      *(int*)&u = b[q++];
  }

#define m(p, q) while (p) putchar(#q[0]);

  m(u.c--, i)
  m(u.d--, s)
  m(u.e++ < 4, d)
  m(--u.e > 4, i)
  m(u.f--, s)
  m(u.g++ < 32, d)
  m(--u.g > 32, i)
  puts("o");
}

ความจริงเกี่ยวกับความสนุกสนานรหัสนี้รุ่นก่อนหน้านี้ใช้อาร์เรย์ของ 256 สหภาพแรงงานแทนเพียงและu vรุ่นนั้นทำให้ GCC 4.7.2 สร้างข้อผิดพลาดของคอมไพเลอร์ภายใน! อย่างไรก็ตาม GCC 4.9 แก้ไขแล้วและโค้ดด้านบนใช้ได้กับทั้งสองเวอร์ชัน


1
โปรแกรมจะต้องใส่ตัวเลขไม่ซ้ำมากกว่า [0 ... 255] (แทนที่for(...)ด้วยscanf- ซึ่งจะลดจำนวนตัวอักษร)
anatolyg

นอกจากนี้บางทีการแทนที่ C99 ด้วยภาษาที่ผ่อนคลายยิ่งกว่านั้นก็สามารถกำจัดได้#includeและบางทีคุณอาจทำให้ชื่อstructที่อยู่ด้านในunionไม่มี
anatolyg

@anatolyg: ขอบคุณฉันคงโปรแกรมที่จะใช้หมายเลขจาก stdin แทนที่จะพิมพ์ [0,255] การforวนซ้ำยังคงจำเป็นเนื่องจากวิธีการคำนวณผลลัพธ์ รวมถึงการยกเลิกการตั้งชื่อ struct บันทึก 5 ตัวอักษร; อีก 2 รายการได้รับการบันทึกโดยเปลี่ยน==เป็น>และลบบรรทัดใหม่ที่ต่อท้าย :) โปรแกรมใช้งานได้อย่างสมบูรณ์ใน C99 เท่านั้นเนื่องจากmainไม่ส่งคืนค่าอย่างชัดเจน การลบ#includeผลลัพธ์ในข้อผิดพลาดเนื่องจากscanf()ตอนนี้
John Zwinck

ผลลัพธ์ของฉันผิดจริงเพราะคุณไม่สามารถใช้ประโยชน์256ได้
Martin Ender

@ MartinBüttner: ขอบคุณสำหรับความคิดเห็น ฉันได้อัปเดตตารางการค้นหาในรหัสของฉันเพื่อให้ตรงกับผลลัพธ์ใหม่ของคุณใน [240,255] ค่าใช้จ่ายนี้สำหรับฉันตัวละครไม่กี่คนเพราะค่าคงที่จำนวนมากเพิ่มขึ้นจาก 4 ถึง 5 ไบต์ไม่ต้องพูดถึงตอนนี้ผลลัพธ์ที่ได้จะยาวขึ้น แต่อย่างน้อยก็ถูกต้องแล้ว ฉันเปลี่ยนชื่อจาก "C99" เป็น "C" เนื่องจากฉันไม่ได้ใช้คุณลักษณะเฉพาะของ C99 อีกต่อไป
John Zwinck

5

Haskell, 2200 2177 2171 = 2036 + 135

f n=[s|s<-l,s%0==show n]!!0
l="":[c:x|x<-l,c<-"iosd"]
(h:s)%n|h<'e'=s%(n-1)|h<'j'=s%(n+1)|h<'p'=show n++s%n|n==16=s%0|0<1=s%(n^2)
x%_=x

ทำงานได้โดยมีรายการอนันต์ของโปรแกรมเดดฟิชทั้งหมดเรียงตามความยาวพร้อมด้วยสถานะภายในและเอาต์พุต ฟังก์ชั่นfค้นหารายการและส่งกลับรายการแรกที่ตรงกับ

วิธีการนี้อนุญาตให้มีหลายรายการoในแต่ละรหัสผลลัพธ์ แต่ไม่ จำกัด เพียงการพิมพ์ตัวเลขทั้งหมดแยกกันหรือพิมพ์หมายเลขทั้งหมดในครั้งเดียว ตัวอย่างเช่นที่นี่ 216 iiossoมีรหัสของ

แก้ไข:
ตามสเป็คเมื่อสถานะเป็น 256 (แต่ไม่ใช่ 257) มันจะกลายเป็น 0 ตอนนี้รหัสของฉันคำนึงถึงสิ่งนี้ ตัวอย่างเช่น iissoso160

นี่เป็นปัญหาด้านประสิทธิภาพบางประการ เนื่องจากlเป็นรายการระดับบนสุดองค์ประกอบทั้งหมดlที่ได้รับการประเมินจะยังคงอยู่ในหน่วยความจำและอาจไม่สามารถใช้งานได้ในบางช่วงเวลา

ในการคำนวณคะแนนฉันทำรุ่นที่เทียบเท่า แต่น้อยกว่าหน่วยความจำหนัก

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

รหัสที่มีประสิทธิภาพยิ่งขึ้นยังเพิ่มข้อ จำกัด เพิ่มเติมให้กับองค์ประกอบของรายการด้วย - จะกรองรหัสทั้งหมดที่มีidหรือdiหรือมีsเมื่อสถานะมีขนาดเล็กกว่า 2

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

รหัสที่มีประสิทธิภาพยิ่งขึ้น:

f' n=[reverse s|(s,_,r)<-l,r==show n]!!0 where
    l=("",0,""):l>>= \(i,s,r)->filter g[('i':i,s+1,r),('o':i,s,r++show s),('s':i,if s==16 then 0 else s*s,r),('d':i,s-1,r)]
    g('i':'d':_,_,_)=False
    g('d':'i':_,_,_)=False
    g('i':'i':_,4,_)=False
    g('s':_,1,_)=False
    g("s",_,_)=False
    g("si",_,_)=False
    g(i,s,r)=s<256&&s>=0&&isPrefixOf r (show n)

โปรดทราบว่ารหัสที่มีประสิทธิภาพยิ่งขึ้นจะไม่ได้ผลลัพธ์เดียวกันเนื่องจากโปรแกรมสำรวจรหัสที่เป็นไปได้ทั้งหมดตามลำดับที่แตกต่างกัน อย่างไรก็ตามพวกเขาจะส่งออกรหัสของความยาวเดียวกัน นอกจากนี้การสลับc:xกับx++[c]ทำให้โปรแกรมเทียบเท่า

ด้วยรหัสนี้ฉันสามารถคำนวณโปรแกรมทั้งหมดใน 52 0.81 วินาที

แก้ไข:
เห็นได้ชัดว่านี่คือคำตอบที่ดีที่สุด! ฉันสังเกตเห็นมันตอนนี้จนถึงตอนนี้ถาม ...

ผลลัพธ์:

1   io
2   iio
3   iiio
4   iiso
5   iisio
6   iisiio
7   iiisddo
8   iiisdo
9   iiiso
10  iodo
11  ioo
12  ioio
13  ioiio
14  ioiso
15  iissdo
16  iisso
17  iissio
18  iissiio
19  ioiiso
20  iioddo
21  iiodo
22  iioo
23  iioio
24  iioso
25  iiosio
26  iiosiio
27  iioisddo
28  iioisdo
29  iioiso
30  iiioisso
31  iiioddo
32  iiiodo
33  iiioo
34  iiioio
35  iiioiio
36  iisiiso
37  iiiosddo
38  iiiosdo
39  iiioso
40  iisosso
41  iisossio
42  iisoddo
43  iisodo
44  iisoo
45  iisoio
46  iisoiio
47  iisoiiio
48  iisodsdo
49  iisodso
50  iiisddsio
51  iiisddsiio
52  iisiodddo
53  iisioddo
54  iisiodo
55  iisioo
56  iisioio
57  iisioiio
58  iisioiiio
59  iisioddso
60  iiisdsddddo
61  iiisdsdddo
62  iiisdsddo
63  iiisdsdo
64  iiisdso
65  iiisdsio
66  iisiioo
67  iisiioio
68  iisiioiio
69  iisiioiiio
70  iiisdsiiiiiio
71  iiisdsiiiiiiio
72  iiisddodddddo
73  iiisddoddddo
74  iiisddodddo
75  iiisddoddo
76  iiisddodo
77  iiisddoo
78  iiissdddo
79  iiissddo
80  iiissdo
81  iiisso
82  iiissio
83  iiissiio
84  iiissiiio
85  iiissiiiio
86  iiisdoddo
87  iiisdodo
88  iiisdoo
89  iiisdoio
90  iiisodddddsso
91  iiisodddddssio
92  iiisodddddddo
93  iiisoddddddo
94  iiisodddddo
95  iiisoddddo
96  iiisodddo
97  iiisoddo
98  iiisodo
99  iiisoo
100 iodoo
101 iodoio
102 iodoiio
103 iodoiiio
104 iodoiiso
105 iodoiisio
106 iodoiisiio
107 iiisiodddo
108 iiisioddo
109 iiisiodo
110 ioodo
111 iooo
112 iooio
113 iooiio
114 iooiso
115 ioissdo
116 ioisso
117 ioissio
118 ioissiio
119 iooiiso
120 ioioddo
121 ioiodo
122 ioioo
123 ioioio
124 ioioso
125 ioiosio
126 ioiosiio
127 ioioisddo
128 ioioisdo
129 ioioiso
130 ioiioisso
131 ioiioddo
132 ioiiodo
133 ioiioo
134 ioiioio
135 ioiioiio
136 ioisiiso
137 ioiiosddo
138 ioiiosdo
139 ioiioso
140 ioisosso
141 ioisossio
142 ioisoddo
143 ioisodo
144 ioisoo
145 ioisoio
146 ioisoiio
147 ioisoiiio
148 ioisodsdo
149 ioisodso
150 iissdoiso
151 iissdoisio
152 ioisiodddo
153 ioisioddo
154 ioisiodo
155 ioisioo
156 ioisioio
157 ioisioiio
158 ioisioiiio
159 ioisioddso
160 iissoso
161 iissosio
162 iissosiio
163 ioiisdsdo
164 ioiisdso
165 ioiisdsio
166 ioisiioo
167 ioisiioio
168 iissdddsdo
169 iissdddso
170 iissiodso
171 iissiodsio
172 iissiodsiio
173 iissiodsiiio
174 iissiodsiiso
175 ioiisddoddo
176 ioiisddodo
177 ioiisddoo
178 ioiissdddo
179 ioiissddo
180 ioiissdo
181 ioiisso
182 ioiissio
183 ioiissiio
184 ioiissiiio
185 ioiissiiiio
186 ioiisdoddo
187 ioiisdodo
188 ioiisdoo
189 ioiisdoio
190 iissiiiodddso
191 iissddsdddddo
192 iissddsddddo
193 iissddsdddo
194 iissddsddo
195 iissddsdo
196 iissddso
197 iissddsio
198 ioiisodo
199 ioiisoo
200 iioddoo
201 iioddoio
202 iioddoiio
203 iioddoiiio
204 iioddoiiso
205 iioddoiisio
206 iioddoiisiio
207 iioddoiiisddo
208 iioddoiiisdo
209 iioddoiiiso
210 iioisio
211 iiodoo
212 iiodoio
213 iiodoiio
214 iiossddo
215 iiossdo
216 iiosso
217 iiossio
218 iiossiio
219 iiossiiio
220 iiooddo
221 iioodo
222 iiooo
223 iiooio
224 iiooso
225 iioosio
226 iioosiio
227 iiooisddo
228 iiooisdo
229 iiooiso
230 iioioisso
231 iioioddo
232 iioiodo
233 iioioo
234 iioioio
235 iioioiio
236 iiosiiso
237 iioiosddo
238 iioiosdo
239 iioioso
240 iiososso
241 iiosossio
242 iiosoddo
243 iiosodo
244 iiosoo
245 iiosoio
246 iiosoiio
247 iiosoiiio
248 iiosodsdo
249 iiosodso
250 iioisddsio
251 iioisddsiio
252 iiosiodddo
253 iiosioddo
254 iiosiodo
255 iiosioo

3

Picat 516 + 2060 = 2576

มันเป็นรุ่นที่ได้รับการแก้ไขของโปรแกรมSergey Dymchenko รุ่นนี้ให้ผลผลิตโปรแกรมเดดฟิชขนาดกะทัดรัดมากขึ้น

import planner.
final((N,N))=>true.
action((N,A),B,M,C)?=>B=(N,A+1),M=i,C=1.
action((N,A),B,M,C)?=>A!=16,A<N,B=(N,A*A),M=s,C=1.
action((N,A),B,M,C)?=>A>0,B=(N,A-1),M=d,C=1.
r([X,Y|Z],A)?=>(r([Y|Z],R),A=[X|R];X!=['0'],r([(X++Y)|Z],R),A=R).
r([],A)=>A=[]. r([N],A)=>A=[N]. lf(X)=[X].
table(+,-,min) fs(N,M,L)=>r(map(lf,N.to_string()),X),Np:=0,Pp:=[],
foreach(Y in X)N:=Y.to_integer(),best_plan((N,Np),P),Np:=N,Pp:=Pp++P++[o]
end,L=Pp.length(),M=Pp. main=>foreach(X in 1..255)fs(X,P,L),printf("%s",P) end.

เท่าที่ฉันเข้าใจประโยค "ความยาวของผลลัพธ์" หมายความว่าฉันควรรวมเอาท์พุทโดยไม่ต้องมีตัวอักษรขึ้นบรรทัดใหม่

ใช้:

picat filename.pi

รหัส 1-255:

picat filename.pi | wc -c    

2060

ประสิทธิภาพ:

cat /proc/cpuinfo # 4 cores with HT = virtual 8 cores

processor   : 0
vendor_id   : GenuineIntel
cpu family  : 6
model       : 42
model name  : Intel(R) Core(TM) i7-2600K CPU @ 3.40GHz
stepping    : 7
physical id : 0
siblings    : 8
core id     : 1
cpu cores   : 4
apicid      : 2
cpu MHz     : 1600.000
cache size  : 8192 KB
...
bogomips    : 6819.33
...

เวอร์ชันของโปรแกรมที่ใช้วัดเวลา:

import planner.
import sys.
final((N,N))=>true.
action((N,A),B,M,C)?=>B=(N,A+1), M=i, C=1.
action((N,A),B,M,C)?=>A!=16, A<N, B=(N,A*A), M=s, C=1.
action((N,A),B,M,C)?=>A>0, B=(N,A-1), M=d, C=1.
r([X,Y|Z],A)?=>(r([Y|Z],R),A=[X|R];r([(X++Y)|Z],R),A=R).
r([],A)=>A=[]. r([N],A)=>A=[N]. lf(X)=[X].
table(+,-,min) fs(N,M,L)=>r(map(lf,N.to_string()),X),Np:=0,Pp:=[],
foreach(Y in X)N:=Y.to_integer(),best_plan((N,Np),P),Np:=N,Pp:=Pp++P++[o]
end,L=Pp.length(),M=Pp. go=>foreach(X in 1..255)fs(X,P,L),printf("%d %s",X,P),nl end.
main=>time2(go).

ผล:

picat filename.pi

...

251 iiosioddddo
252 iiosiodddo
253 iiosioddo
254 iiosiodo
255 iiosioo

CPU time 2.2 seconds. Backtracks: 0

ผลผลิตเต็ม:

1 io
2 iio
3 iiio
4 iiso
5 iisio
6 iisiio
7 iiisddo
8 iiisdo
9 iiiso
10 iodo
11 ioo
12 ioio
13 ioiio
14 ioiso
15 ioisio
16 iisso
17 iissio
18 ioiisdo
19 ioiiso
20 iioddo
21 iiodo
22 iioo
23 iioio
24 iioso
25 iiosio
26 iiosiio
27 iioisddo
28 iioisdo
29 iioiso
30 iiiodddo
31 iiioddo
32 iiiodo
33 iiioo
34 iiioio
35 iiioiio
36 iisiiso
37 iiiosddo
38 iiiosdo
39 iiioso
40 iisoddddo
41 iisodddo
42 iisoddo
43 iisodo
44 iisoo
45 iisoio
46 iisoiio
47 iisoiiio
48 iisodsdo
49 iisodso
50 iiisddsio
51 iisioddddo
52 iisiodddo
53 iisioddo
54 iisiodo
55 iisioo
56 iisioio
57 iisioiio
58 iisioiiio
59 iisioddso
60 iiisdsddddo
61 iiisdsdddo
62 iiisdsddo
63 iiisdsdo
64 iiisdso
65 iisiiodo
66 iisiioo
67 iisiioio
68 iisiioiio
69 iisiioiiio
70 iiisdsiiiiiio
71 iiisddoddddddo
72 iiisddodddddo
73 iiisddoddddo
74 iiisddodddo
75 iiisddoddo
76 iiisddodo
77 iiisddoo
78 iiisddoio
79 iiissddo
80 iiissdo
81 iiisso
82 iiissio
83 iiissiio
84 iiissiiio
85 iiisdodddo
86 iiisdoddo
87 iiisdodo
88 iiisdoo
89 iiisdoio
90 iiisodddddddddo
91 iiisoddddddddo
92 iiisodddddddo
93 iiisoddddddo
94 iiisodddddo
95 iiisoddddo
96 iiisodddo
97 iiisoddo
98 iiisodo
99 iiisoo
100 iodoo
101 iodoio
102 iodoiio
103 iodoiiio
104 iodoiiso
105 iodoiisio
106 iodoiisiio
107 iiisiodddo
108 iiisioddo
109 iiisiodo
110 ioodo
111 iooo
112 iooio
113 iooiio
114 iooiso
115 iooisio
116 ioisso
117 ioissio
118 iooiisdo
119 iooiiso
120 ioioddo
121 ioiodo
122 ioioo
123 ioioio
124 ioioso
125 ioiosio
126 ioiosiio
127 ioioisddo
128 ioioisdo
129 ioioiso
130 ioiiodddo
131 ioiioddo
132 ioiiodo
133 ioiioo
134 ioiioio
135 ioiioiio
136 ioisiiso
137 ioiiosddo
138 ioiiosdo
139 ioiioso
140 ioisoddddo
141 ioisodddo
142 ioisoddo
143 ioisodo
144 ioisoo
145 ioisoio
146 ioisoiio
147 ioisoiiio
148 ioisodsdo
149 ioisodso
150 ioiisddsio
151 ioisioddddo
152 ioisiodddo
153 ioisioddo
154 ioisiodo
155 ioisioo
156 ioisioio
157 ioisioiio
158 ioisioiiio
159 ioisioddso
160 ioiisdsddddo
161 ioiisdsdddo
162 ioiisdsddo
163 ioiisdsdo
164 ioiisdso
165 ioisiiodo
166 ioisiioo
167 ioisiioio
168 ioisiioiio
169 iissdddso
170 iissdddsio
171 iissdddsiio
172 iissdddsiiio
173 ioiisddoddddo
174 ioiisddodddo
175 ioiisddoddo
176 ioiisddodo
177 ioiisddoo
178 ioiisddoio
179 ioiissddo
180 ioiissdo
181 ioiisso
182 ioiissio
183 ioiissiio
184 ioiissiiio
185 ioiisdodddo
186 ioiisdoddo
187 ioiisdodo
188 ioiisdoo
189 ioiisdoio
190 iissddsddddddo
191 iissddsdddddo
192 iissddsddddo
193 iissddsdddo
194 iissddsddo
195 iissddsdo
196 iissddso
197 ioiisoddo
198 ioiisodo
199 ioiisoo
200 iioddoo
201 iioddoio
202 iioddoiio
203 iioddoiiio
204 iioddoiiso
205 iioddoiisio
206 iioddoiisiio
207 iioddoiiisddo
208 iioddoiiisdo
209 iioddoiiiso
210 iiododo
211 iiodoo
212 iiodoio
213 iiodoiio
214 iiodoiso
215 iiossdo
216 iiosso
217 iiossio
218 iiossiio
219 iiodoiiso
220 iiooddo
221 iioodo
222 iiooo
223 iiooio
224 iiooso
225 iioosio
226 iioosiio
227 iiooisddo
228 iiooisdo
229 iiooiso
230 iioiodddo
231 iioioddo
232 iioiodo
233 iioioo
234 iioioio
235 iioioiio
236 iiosiiso
237 iioiosddo
238 iioiosdo
239 iioioso
240 iiosoddddo
241 iiosodddo
242 iiosoddo
243 iiosodo
244 iiosoo
245 iiosoio
246 iiosoiio
247 iiosoiiio
248 iiosodsdo
249 iiosodso
250 iioisddsio
251 iiosioddddo
252 iiosiodddo
253 iiosioddo
254 iiosiodo
255 iiosioo

เป็นตัวอย่างสุดท้ายที่คุณควรจะพิมพ์ 255 หรือไม่ ถ้าเป็นเช่นนั้นดูเหมือนว่าคุณไม่เข้าใจการทำงาน o - มันพิมพ์หมายเลขปัจจุบันบิตไม่รีเซ็ตมันดังนั้นioioจะพิมพ์"12" และไม่ได้"11"
ความภาคภูมิใจ haskeller

ขอบคุณผู้มีความภาคภูมิใจที่ได้ชี้ไปที่ความเข้าใจผิดของฉัน ฉันแก้ไขโปรแกรมแล้ว
Vasil Diadov

2

JavaScript (E6) 141 + 3455 = 3596

ฟังก์ชั่นแบบเรียกซ้ำมองหาสแควร์รูทที่ใกล้ที่สุด แต่การหลีกเลี่ยง 16 เป็น 16 * 16 = 256 จะถูกเปลี่ยนเป็น 0 คำตอบอื่น ๆ อีกมากมายไม่ได้รับจุดนี้

F=(t,s='o',o='i')=>
  t>3?(
    q=Math.sqrt(t)|0,
    r=q+1,
    q-16?r-16||++r:--q,
    d=t-q*q,e=r*r-t,
    e<=d&&(o='d',d=e,++q),
    F(q,'s'+o.repeat(d)+s)
  ):o.repeat(t)+s

ทดสอบในคอนโซล FireFox / FireBug

for(l=0,i=1;i<256;++i)o=F(i),l+=o.length,console.log(i,o),l

เอาท์พุต

1 io
2 iio
3 iiio
4 iiso
5 iisio
6 iisiio
7 iiisddo
8 iiisdo
9 iiiso
10 iiisio
11 iiisiio
12 iiisiiio
13 iissdddo
14 iissddo
15 iissdo
16 iisso
17 iissio
18 iissiio
19 iissiiio
20 iissiiiio
21 iisisddddo
22 iisisdddo
23 iisisddo
24 iisisdo
25 iisiso
26 iisisio
27 iisisiio
28 iisisiiio
29 iisisiiiio
30 iisisiiiiio
31 iisiisdddddo
32 iisiisddddo
33 iisiisdddo
34 iisiisddo
35 iisiisdo
36 iisiiso
37 iisiisio
38 iisiisiio
39 iisiisiiio
40 iisiisiiiio
41 iisiisiiiiio
42 iisiisiiiiiio
43 iiisddsddddddo
44 iiisddsdddddo
45 iiisddsddddo
46 iiisddsdddo
47 iiisddsddo
48 iiisddsdo
49 iiisddso
50 iiisddsio
51 iiisddsiio
52 iiisddsiiio
53 iiisddsiiiio
54 iiisddsiiiiio
55 iiisddsiiiiiio
56 iiisddsiiiiiiio
57 iiisdsdddddddo
58 iiisdsddddddo
59 iiisdsdddddo
60 iiisdsddddo
61 iiisdsdddo
62 iiisdsddo
63 iiisdsdo
64 iiisdso
65 iiisdsio
66 iiisdsiio
67 iiisdsiiio
68 iiisdsiiiio
69 iiisdsiiiiio
70 iiisdsiiiiiio
71 iiisdsiiiiiiio
72 iiisdsiiiiiiiio
73 iiissddddddddo
74 iiissdddddddo
75 iiissddddddo
76 iiissdddddo
77 iiissddddo
78 iiissdddo
79 iiissddo
80 iiissdo
81 iiisso
82 iiissio
83 iiissiio
84 iiissiiio
85 iiissiiiio
86 iiissiiiiio
87 iiissiiiiiio
88 iiissiiiiiiio
89 iiissiiiiiiiio
90 iiissiiiiiiiiio
91 iiisisdddddddddo
92 iiisisddddddddo
93 iiisisdddddddo
94 iiisisddddddo
95 iiisisdddddo
96 iiisisddddo
97 iiisisdddo
98 iiisisddo
99 iiisisdo
100 iiisiso
101 iiisisio
102 iiisisiio
103 iiisisiiio
104 iiisisiiiio
105 iiisisiiiiio
106 iiisisiiiiiio
107 iiisisiiiiiiio
108 iiisisiiiiiiiio
109 iiisisiiiiiiiiio
110 iiisisiiiiiiiiiio
111 iiisiisddddddddddo
112 iiisiisdddddddddo
113 iiisiisddddddddo
114 iiisiisdddddddo
115 iiisiisddddddo
116 iiisiisdddddo
117 iiisiisddddo
118 iiisiisdddo
119 iiisiisddo
120 iiisiisdo
121 iiisiiso
122 iiisiisio
123 iiisiisiio
124 iiisiisiiio
125 iiisiisiiiio
126 iiisiisiiiiio
127 iiisiisiiiiiio
128 iiisiisiiiiiiio
129 iiisiisiiiiiiiio
130 iiisiisiiiiiiiiio
131 iiisiisiiiiiiiiiio
132 iiisiisiiiiiiiiiiio
133 iiisiiisdddddddddddo
134 iiisiiisddddddddddo
135 iiisiiisdddddddddo
136 iiisiiisddddddddo
137 iiisiiisdddddddo
138 iiisiiisddddddo
139 iiisiiisdddddo
140 iiisiiisddddo
141 iiisiiisdddo
142 iiisiiisddo
143 iiisiiisdo
144 iiisiiiso
145 iiisiiisio
146 iiisiiisiio
147 iiisiiisiiio
148 iiisiiisiiiio
149 iiisiiisiiiiio
150 iiisiiisiiiiiio
151 iiisiiisiiiiiiio
152 iiisiiisiiiiiiiio
153 iiisiiisiiiiiiiiio
154 iiisiiisiiiiiiiiiio
155 iiisiiisiiiiiiiiiiio
156 iiisiiisiiiiiiiiiiiio
157 iissdddsddddddddddddo
158 iissdddsdddddddddddo
159 iissdddsddddddddddo
160 iissdddsdddddddddo
161 iissdddsddddddddo
162 iissdddsdddddddo
163 iissdddsddddddo
164 iissdddsdddddo
165 iissdddsddddo
166 iissdddsdddo
167 iissdddsddo
168 iissdddsdo
169 iissdddso
170 iissdddsio
171 iissdddsiio
172 iissdddsiiio
173 iissdddsiiiio
174 iissdddsiiiiio
175 iissdddsiiiiiio
176 iissdddsiiiiiiio
177 iissdddsiiiiiiiio
178 iissdddsiiiiiiiiio
179 iissdddsiiiiiiiiiio
180 iissdddsiiiiiiiiiiio
181 iissdddsiiiiiiiiiiiio
182 iissdddsiiiiiiiiiiiiio
183 iissddsdddddddddddddo
184 iissddsddddddddddddo
185 iissddsdddddddddddo
186 iissddsddddddddddo
187 iissddsdddddddddo
188 iissddsddddddddo
189 iissddsdddddddo
190 iissddsddddddo
191 iissddsdddddo
192 iissddsddddo
193 iissddsdddo
194 iissddsddo
195 iissddsdo
196 iissddso
197 iissddsio
198 iissddsiio
199 iissddsiiio
200 iissddsiiiio
201 iissddsiiiiio
202 iissddsiiiiiio
203 iissddsiiiiiiio
204 iissddsiiiiiiiio
205 iissddsiiiiiiiiio
206 iissddsiiiiiiiiiio
207 iissddsiiiiiiiiiiio
208 iissddsiiiiiiiiiiiio
209 iissddsiiiiiiiiiiiiio
210 iissddsiiiiiiiiiiiiiio
211 iissdsddddddddddddddo
212 iissdsdddddddddddddo
213 iissdsddddddddddddo
214 iissdsdddddddddddo
215 iissdsddddddddddo
216 iissdsdddddddddo
217 iissdsddddddddo
218 iissdsdddddddo
219 iissdsddddddo
220 iissdsdddddo
221 iissdsddddo
222 iissdsdddo
223 iissdsddo
224 iissdsdo
225 iissdso
226 iissdsio
227 iissdsiio
228 iissdsiiio
229 iissdsiiiio
230 iissdsiiiiio
231 iissdsiiiiiio
232 iissdsiiiiiiio
233 iissdsiiiiiiiio
234 iissdsiiiiiiiiio
235 iissdsiiiiiiiiiio
236 iissdsiiiiiiiiiiio
237 iissdsiiiiiiiiiiiio
238 iissdsiiiiiiiiiiiiio
239 iissdsiiiiiiiiiiiiiio
240 iissdsiiiiiiiiiiiiiiio
241 iissdsiiiiiiiiiiiiiiiio
242 iissdsiiiiiiiiiiiiiiiiio
243 iissdsiiiiiiiiiiiiiiiiiio
244 iissdsiiiiiiiiiiiiiiiiiiio
245 iissdsiiiiiiiiiiiiiiiiiiiio
246 iissdsiiiiiiiiiiiiiiiiiiiiio
247 iissdsiiiiiiiiiiiiiiiiiiiiiio
248 iissdsiiiiiiiiiiiiiiiiiiiiiiio
249 iissdsiiiiiiiiiiiiiiiiiiiiiiiio
250 iissdsiiiiiiiiiiiiiiiiiiiiiiiiio
251 iissdsiiiiiiiiiiiiiiiiiiiiiiiiiio
252 iissdsiiiiiiiiiiiiiiiiiiiiiiiiiiio
253 iissdsiiiiiiiiiiiiiiiiiiiiiiiiiiiio
254 iissdsiiiiiiiiiiiiiiiiiiiiiiiiiiiiio
255 iissdsiiiiiiiiiiiiiiiiiiiiiiiiiiiiiio
3455

2

Picat, 242 รหัส + เอาท์พุท 3455 = 3697

ดูhttp://picat-lang.org/สำหรับข้อมูลเกี่ยวกับ Picat

import planner. final((N,N))=>true. action((N,A),B,M,C)?=>B=(N,A+1),M=i,C=1. action((N,A),B,M,C)?=>A!=16,A<N,B=(N,A*A),M=s,C=1. action((N,A),B,M,C)?=>A>0,B=(N,A-1),M=d,C=1. main([X])=>N=X.to_integer(),best_plan((N,0),P),printf("%w\n",P++[o]).

หักกอล์ฟ:

import planner.
final((N,N))=>true.
action((N,A),B,M,C)?=>B=(N,A+1),M=i,C=1.
action((N,A),B,M,C)?=>A!=16,A<N,B=(N,A*A),M=s,C=1.
action((N,A),B,M,C)?=>A>0,B=(N,A-1),M=d,C=1.
main([X])=>N=X.to_integer(),best_plan((N,0),P),printf("%w\n",P++[o]).

1

Python 3 - 4286 + 168 = 4454

ไม่จริงจังเกินไป แต่ง่ายมาก เพิ่งค้นพบสิ่งที่ดีที่สุดในการเพิ่ม 0, a square, a 4 thอำนาจและ 8 THอำนาจ.

แก้ไข:แข็งแรงเล่นกอล์ฟ 75 ไบต์ 8 THอำนาจไม่ได้ทำอะไร

แก้ไข 2:dนำออกไบต์บางอย่างเพื่อให้ใช้อย่างถูกต้อง คะแนนที่เพิ่มขึ้นแม้ว่า

i=int(input())
s=round(i**.5)
q=round(s**.5)
o=round(q**.5)
a,b,c,d=i-256if i>127else i,i-s*s,i-q**4,i-o**8
print(sorted([(a*'i'if a>0else'd'*-a)+'o',s*'i'+'s'+(b*'i'if b>0else'd'*-b)+'o',q*'i'+'ss'+(c*'i'if c>0else'd'*-c)+'o',o*'i'+'sss'+(d*'i'if d>0else'd'*-d)+'o'],key=len)[0])

Python 3 - 2594 + 201 = 2795

อันนี้ใช้การค้นหาในเชิงลึกก่อนเพื่อค้นหาโปรแกรมที่สั้นที่สุด ฉันได้เพิ่มประสิทธิภาพบางอย่าง (ไม่จำเป็น?) เพื่อให้ได้ผลลัพธ์ วิธีนี้ไม่จำเป็นต้องเรียกใช้เส้นทางจำนวนมาก อาจพยายามลบบางรายการออก ไม่เอาชนะ JS หนึ่งเพราะใช้สมาร์ททริคเช่นหลายoเกม

แก้ไข: Golfed off 93 bytes ฉันเห็นได้ชัดว่ามีรหัสที่ไร้ประโยชน์โดยการพัฒนา ยังลบทุกสิ่งที่ฉันพบว่าไม่จำเป็นออกไป ฉันมาที่นี่ JS

แก้ไข 2: Golfed off อีก 8 ไบต์ นั่นreturnไม่จำเป็น

แก้ไข 3:เล่นกอล์ฟเพิ่มอีก 5 ไบต์ ตอนนี้เราได้กำจัดสิ่งหนึ่งที่ wo สามารถใส่elifแทนreturnได้

แก้ไขที่ 4:dการแก้ไขการทำงานของ ขนาดเพิ่มขึ้น 1 ไบต์ให้คะแนนบางไบต์

def f(i,s,h):
 global x,p
 if h==a:p+=[i]
 elif s<x[h]:x[h]=s;f(i+'s',s+1,h*h%256);f(i+'i',s+1,(h+1)%256);f(i+'d',s+1,max(h-1,0))
a,p=int(input()),[];x=[a]*256;f('',0,0);print(sorted(p,key=len)[0]+'o')

1

APL: 80 + 3456 = 3536

⌽'o',{⍵<4:⍵⍴'i'⋄(b/'ids'),∇(-⊃b)+b[2]+⍵*÷1+3⊃b←(⍵>240)⌽⊃(>,<,=)/|⍵-2*⍨(⌈,⌊)⍵*.5}

คำอธิบาย: (แก้ไขหลังจากบันทึกของ edc65 ขอบคุณ)

⍵ <4: ⍵⍴'i 'หากอาร์กิวเมนต์น้อยกว่า 3 ให้ทำซ้ำ "i" หลายครั้ง

(⌈, ⌊) ⍵ * .5 ⍵เป็นอาร์กิวเมนต์ใช้สแควร์รูทแล้วยึดเพดานกับพื้น

| ⍵-2 * ⍨ยกเพดานและพื้นเหล่านั้นขึ้นสู่อำนาจ 2 ลบอาร์กิวเมนต์และทำให้เป็นบวก

b ←⊃ (>, <, =) / รับเวกเตอร์บูลีนที่มี> b, a

(⍵> 240) ⌽เพื่อหลีกเลี่ยงการไปที่ 256 ให้ทำ "i" สำหรับตัวเลขที่มากกว่า 240 แทนที่จะเป็น ^ 2

b / 'id' ใช้บูลีนที่จะใช้ i, d หรือ s และผนวกเข้ากับโซลูชันด้วย

, ∇ (-⊃b) + b [2] + ⍵ * ÷ 1 + 3⊃bเรียกใช้ฟังก์ชันซ้ำด้วยอาร์กิวเมนต์ -b 1 + b [2] ยกระดับพลังงาน (อินเวอร์สของ b [3] +1)

สามารถนับผลลัพธ์ด้วย:

 +/⊃,/⍴¨(⌽'o',{⍵<4:⍵⍴'i'⋄(b/'ids'),∇(-⊃b)+b[2]+⍵*÷1+3⊃b←(⍵>240)⌽⊃(>,<,=)/|⍵-2*⍨(⌈,⌊)⍵*.5})¨¯1+⍳256

¨ใช้ฟังก์ชั่นกับแต่ละหมายเลข 0-255

+ / ⊃, / ⍴¨นับจำนวนองค์ประกอบทั้งหมด

อีกครั้งคุณสามารถลองทุกอย่างด้านบนได้ที่TryApl.org

BTW:มันคือ 3456 และไม่ใช่ 3455 เพราะฉันกำลังพิจารณา 0 ด้วยเช่นกันเพราะฉันคิดว่าปัญหากำลังถาม หากเป็น 1-255 คะแนนจะเป็น 80 + 3455 = 3535


1
ไม่ถูกต้องสำหรับตัวเลขจำนวนมาก (เนื่องจาก 256 และ -1 -> 0) ตัวอย่าง 255 iisssdo: i: 1, i: 2, s: 4, s: 16, s: 256-> 0, d: -1-> 0, เอาต์พุต 0
edc65

ไม่ทราบเกี่ยวกับ 256-> 0 ฉันจะลองอีกครั้งในภายหลัง ขอบคุณสำหรับการชี้ให้เห็นว่า
Moris Zucca

1
APL . . ชาวนา ASCII หลอกล่อตั้งแต่ <เมื่อใดก็ตาม>
Soham Chowdhury

0

Python 2712 = 2608 + 104

รหัส:

v=lambda i:reduce(lambda x,y:(int(y),x[1]+['d','i'][int(y)>x[0]]*abs(int(y)-x[0])+"o"),str(i),(0,""))[1]

ใช้:

v(20)  -> 'iioddo'
v(250) -> 'iioiiiodddddo'

รหัส 0-255:

len(reduce(lambda x,y:x+v(y),range(256),"")) -> 2608

-1

CJam, 2436 2392 2296 2173 ( 74ตัวอักษร + 2099)

"叴噯撘桜᪍뾀戠냞霳㈨嵃畯㓱눿裸㺯蛙㡟激떍䑜㦘啟䂳嗳溘桠㼼ᗎ윆꘶︌英贈袄瞦㺣樅휏╴෼瓵ꃴ︥㷮싎ꗞ冺憳딕礕䀘䬴卺㽅鬞庘䲵"2G#b129b:c~

ซึ่งแปลเป็น:

r_(sa\a+{},\1/{{i_L\[_Tm3>{{__mqi:NN*-N)_*@-_@e<_@=_N+:N;'d'i?*+'s+N_Z3e>>}g}*T-_0<'d'i?\z*\2$3<'s*-W%'o]s\:Z:T;}%s0:T;3:Z;}:A~\A]_:,_$0=#=

พยายามปรับความยาวรหัส Deadfish ให้เหมาะสมโดยเลือกเส้นทางที่สั้นที่สุดเพื่อเข้าถึงตัวเลขแต่ละหลัก

ขอบคุณ Martin สำหรับการแปล Unicode

นี่คือรายการรหัสที่สมบูรณ์

1:io
2:iio
3:iiio
4:iiso
5:iisio
6:iisiio
7:iiisddo
8:iiisdo
9:iiiso
10:iodo
11:ioo
12:ioio
13:ioiio
14:ioiiio
15:ioisio
16:ioisiio
17:ioiisddo
18:ioiisdo
19:ioiiso
20:iioddo
21:iiodo
22:iioo
23:iioio
24:iioiio
25:iioiiio
26:iiosiio
27:iioisddo
28:iioisdo
29:iioiso
30:iiiodddo
31:iiioddo
32:iiiodo
33:iiioo
34:iiioio
35:iiioiio
36:iiioiiio
37:iiiosddo
38:iiiosdo
39:iiioso
40:iisoddddo
41:iisodddo
42:iisoddo
43:iisodo
44:iisoo
45:iisoio
46:iisoiio
47:iisoiiio
48:iisodsdo
49:iisodso
50:iisiodddddo
51:iisioddddo
52:iisiodddo
53:iisioddo
54:iisiodo
55:iisioo
56:iisioio
57:iisioiio
58:iisioiiio
59:iisioddso
60:iisiioddddddo
61:iisiiodddddo
62:iisiioddddo
63:iisiiodddo
64:iisiioddo
65:iisiiodo
66:iisiioo
67:iisiioio
68:iisiioiio
69:iisiioiiio
70:iiisddodddddddo
71:iiisddoddddddo
72:iiisddodddddo
73:iiisddoddddo
74:iiisddodddo
75:iiisddoddo
76:iiisddodo
77:iiisddoo
78:iiisddoio
79:iiisddoiio
80:iiisdoddddddddo
81:iiisdodddddddo
82:iiisdoddddddo
83:iiisdodddddo
84:iiisdoddddo
85:iiisdodddo
86:iiisdoddo
87:iiisdodo
88:iiisdoo
89:iiisdoio
90:iiisodddddddddo
91:iiisoddddddddo
92:iiisodddddddo
93:iiisoddddddo
94:iiisodddddo
95:iiisoddddo
96:iiisodddo
97:iiisoddo
98:iiisodo
99:iiisoo
100:iodo
101:ioo
102:ioio
103:ioiio
104:ioiiio
105:ioisio
106:ioisiio
107:ioiisddo
108:ioiisdo
109:ioiiso
110:ioodo
111:iooo
112:iooio
113:iooiio
114:iooiiio
115:iooisio
116:ioisso
117:ioissio
118:iooiisdo
119:iooiiso
120:ioioddo
121:ioiodo
122:ioioo
123:ioioio
124:ioioiio
125:ioisiso
126:ioiosiio
127:ioioisddo
128:ioioisdo
129:ioioiso
130:ioiiodddo
131:ioiioddo
132:ioiiodo
133:ioiioo
134:ioiioio
135:ioiioiio
136:ioisiiso
137:ioiiosddo
138:ioiiosdo
139:ioiioso
140:ioiiioddddo
141:ioiiiodddo
142:ioiiioddo
143:ioiiiodo
144:ioiiioo
145:ioiiioio
146:ioiiioiio
147:ioiiioiiio
148:ioiiiodsdo
149:ioiiiodso
150:ioiisddsio
151:ioisioddddo
152:ioisiodddo
153:ioisioddo
154:ioisiodo
155:ioisioo
156:ioisioio
157:ioisioiio
158:ioisioiiio
159:ioisioddso
160:ioiisdsddddo
161:ioiisdsdddo
162:ioiisdsddo
163:ioiisdsdo
164:ioiisdso
165:ioisiiodo
166:ioisiioo
167:ioisiioio
168:ioisiioiio
169:ioisiioiiio
170:ioiisdsiiiiiio
171:ioiisddoddddddo
172:ioiisddodddddo
173:ioiisddoddddo
174:ioiisddodddo
175:ioiisddoddo
176:ioiisddodo
177:ioiisddoo
178:ioiisddoio
179:ioiissddo
180:ioiissdo
181:ioiisso
182:ioiissio
183:ioiissiio
184:ioiissiiio
185:ioiisdodddo
186:ioiisdoddo
187:ioiisdodo
188:ioiisdoo
189:ioiisdoio
190:ioiisodddddddddo
191:ioiisoddddddddo
192:ioiisodddddddo
193:ioiisoddddddo
194:ioiisodddddo
195:ioiisoddddo
196:ioiisodddo
197:ioiisoddo
198:ioiisodo
199:ioiisoo
200:iioddo
201:iiodo
202:iioo
203:iioio
204:iioiio
205:iioiiio
206:iiosiio
207:iioisddo
208:iioisdo
209:iioiso
210:iiododo
211:iiodoo
212:iiodoio
213:iiodoiio
214:iiossddo
215:iiossdo
216:iiosso
217:iiossio
218:iiossiio
219:iiodoiiso
220:iiooddo
221:iioodo
222:iiooo
223:iiooio
224:iiooiio
225:iiosiso
226:iioosiio
227:iiooisddo
228:iiooisdo
229:iiooiso
230:iioiodddo
231:iioioddo
232:iioiodo
233:iioioo
234:iioioio
235:iioioiio
236:iiosiiso
237:iioiosddo
238:iioiosdo
239:iioioso
240:iioiioddddo
241:iioiiodddo
242:iioiioddo
243:iioiiodo
244:iioiioo
245:iioiioio
246:iioiioiio
247:iioiioiiio
248:iioiiodsdo
249:iioiiodso
250:iioisddsio
251:iioisddsiio
252:iioiiiodddo
253:iioiiioddo
254:iioiiiodo
255:iioiiioo

ลองออนไลน์ได้ที่นี่:


1
ตอนนี้คำสั่ง o เขียนบรรทัดใหม่ ...
edc65

1
@ edc65 ฉันตรวจสอบหน้าวิกิ ฉันไม่พบที่ใดก็ได้ที่oพิมพ์บรรทัดใหม่ คอมไพเลอร์ทั้งหมดก็พิมพ์แบบไม่มีบรรทัดใหม่
เครื่องมือเพิ่มประสิทธิภาพ

1
ข้อมูลจำเพาะภาษาเกือบจะไม่มีอยู่แล้วจึงไม่มีอะไรเกิดขึ้น แต่มองไปที่รหัสคอมไพเลอร์ ...C printf("%d\n",x); C# Console.WriteLine(x) GO fmt.Println(x) pascal WRITELN(val); python print accumulator (no comma) bash echo $no;; (no -n)
edc65

1
ฉันคิดว่าเราต้องการ OP เพื่อระบุสิ่งนี้อย่างชัดเจนในคำถามแล้ว
เครื่องมือเพิ่มประสิทธิภาพ

1
มีข้อบกพร่องในโปรแกรมของคุณ รหัสทั้งหมด 100-109 200-209 ดูเหมือนจะไม่สนใจ 0
ภูมิใจ haskeller
โดยการใช้ไซต์ของเรา หมายความว่าคุณได้อ่านและทำความเข้าใจนโยบายคุกกี้และนโยบายความเป็นส่วนตัวของเราแล้ว
Licensed under cc by-sa 3.0 with attribution required.