도전 도전이 있습니다 Daniel 의 테니스 를 치자 . 그는 남북 방향으로 법정을 둘 것을 제안합니다. 제 제안은 동서 방향으로 테니스를하기 위해 코트를 만드는 것입니다.
테니스 코트를 인쇄해야하지만 기밀로 인해 가능한 한 적은 바이트로 인쇄해야합니다.
------x------
| | x | |
| |--x--| |
| | x | |
------x------
원래 규칙은 다음과 같습니다.
답변:
s="------x------\n| | x | |\n| |--x"
print s+s[-2::-1]문자열의 첫 번째 절반을 인쇄 한 다음 그 반대를 인쇄합니다. 지루하지만 효율적입니다. out의 반복되는 부분 s, 특히의 추출을 시도했지만 -더 짧은 것을 찾지 못했습니다.
파이썬 2 , 59 바이트
for n in 6,0,2,0,6:x='-'*n+' | |'[n:];print x[::-1]+'x'+x사용 조 왕의 건설 .
파이썬 2 , 62 바이트
b='| '*2
for r in'-'*6,b,'| |--',b,'-'*6:print r+'x'+r[::-1]각 줄의 첫 번째 절반을 인쇄하고 'x'그 다음에 첫 번째 절반을 뒤집습니다.
↑²←⁶↓xx→x²↑²‖Ｏ¬
온라인으로 사용해보십시오! 링크는 자세한 버전의 코드입니다. 설명을 위해 각 드로잉 명령 후 최종 반영까지의 결과를 보여줍니다.
↑² |
|
------
←⁶ |
|
x------
↓xx x |
|
x------
→x² x |
x-- |
x------
↑² x | |
x--| |
s='-'*6;p='| |';w=s+'x'+s;a=p+' x '+p;print(w,a,p+w[4:9]+p,a,w,sep='\n')
아마 골프를 타기-나는 정말로 kolmogorov- 복잡성을 시도한 적이 없다 도전을 .
파이썬 2에서는 76 바이트 까지 얻을 수 있습니다.
s='-'*6;p='| |';w=s+'x'+s;a=p+' x '+p
for i in w,a,p+w[4:9]+p,a,w:print i
-l , RV@<P"| |".[s'-]X2PE'-X6M_.'x.RV_
대체 솔루션, 34 바이트 :
RV@<P"-0| 0| |--"^0M_@<16RA6,t'x
"
-x|"•L®y[Â-Γ•5вèJ.º.∊
25 24 바이트 대안 :
… -|•B°”Ñ•3вèJ3ä'x«».º.∊
설명:
"\n -x|" # Push string "\n -x|"
•L®y[Â-Γ• # Push compressed number 5960566858660563
5в # Converted to Base-5 as list:
# [2,2,2,2,2,2,3,0,4,1,1,4,1,1,3,0,4,1,1,4,2,2,3]
è # Index each digit into the string
J # And join the list together
# "\n -x|" and [2,2,2,2,2,2,3,0,4,1,1,4,1,1,3,0,4,1,1,4,2,2,3]
# → "------x\n| | x\n| |--x"
.º # Intersect mirror everything horizontally
.∊ # Intersect mirror everything vertically (and output implicitly)
… -| # Push string " -|"
•B°”Ñ• # Push compressed integer 193812448
3в # Converted to Base-3 as list: [1,1,1,1,1,1,2,0,0,2,0,0,2,0,0,2,1,1]
è # Index each digit into the string
J # And join the list together
# " -|" and [1,1,1,1,1,1,2,0,0,2,0,0,2,0,0,2,1,1]
# → "------| | | |--"
3ä # Split the string into three parts: ["------","| | ","| |--"]
'x« '# Append an "x" to each: ["------x","| | x","| |--x"]
» # Join by newlines: "------x\n| | x\n| |--x"
.º # Intersect mirror everything horizontally
.∊ # Intersect mirror everything vertically (and output implicitly)내 (섹션이 05AB1E 팁을 참조하십시오 어떻게 큰 정수를 압축하는 방법을? ) 이유를 이해하는 •L®y[Â-Γ•것입니다 5960566858660563하고 •B°”Ñ•있다193812448 .
감사 @MagicOctopusUrn 의 ASCII 아트 생성 용 •L®y[Â-Γ•5BžLR"\n -x|"‡및 •B°”Ñ•3BžLR" -|"‡음역이 스택의 숫자 및 문자열을 교환하여 상기 golfed 된 후에는, 사용하는 в대신 B가진 문자열로하고, 인덱스 è.
00000000: d3d5 0581 0a30 a9cb 55a3 a000 4415 60b2 .....0..U...D.`.
00000010: 06cc 03cb c179 0839 5d14 7d00 .....y.9].}.
13é-Äï5I |<esc>ÄÙ4l5r-Îd^ãrx
16 진 덤프 :
00000000: 3133 e92d c4ef 3549 2020 7c1b c4d9 346c 13.-..5I |...4l
00000010: 3572 2dce 645e e372 78 5r-.d^.rx
내 과정은 다음과 같습니다.
13é-Äï5I |<esc>3<<ÄÙ4l5r-Gã<C-v>ërx
13é-Äï5I |<esc>3<<ÄÙ4l5r-Î7|rx
13é-Äï5I |<esc>3<<ÄÙ4l5r-Îãrx
13é-Äï5I |<esc>ÄÙ4l5r-Îd^ãrx
대체 버전 :
5I |<esc>5ÄM4l5r-HÒ-G.Îxxãrx
16 진 덤프 :
00000000: 3549 2020 7c1b 35c4 4d34 6c35 722d 48d2 5I |.5.M4l5r-H.
00000010: 2d47 2ece 7878 e372 780a -G..xx.rx.
(a='----',A='| |',b='--x--',B=' x ')=>[p=a+b+a,q=A+B+A,A+b+A,q,p].join`
`_=>[p='x---',q='x| ','x| -',q,p].map(c=>[...'1221330331221'].map(d=>c[d]))foreach r[1 2 3 2 1][print pick["------x------""| | x | |""| |--x--| |"]r]
t_ps@L"x-
| "jC"??ôkË7"5
여기에서 온라인으로 사용해보십시오 . 위의 코드에는 이상한 문자가 포함되어 있으므로 복사 / 붙여 넣기가 작동하지 않을 수 있습니다.
패턴의 첫 번째 절반을 인쇄 한 다음 가운데없이 반전시킵니다 x.
t_ps@L"x-\n| "jC"..."5 Note newline replaced with \n, encoded string replaced with ...
C"..." Convert encoded string to base 256 number 727558509253668163499780
j 5 Convert to base 5, yields [1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 2, 3, 4, 4, 3, 4, 4, 0, 4, 4, 3, 4, 4, 3, 2, 3, 4, 4, 3, 1, 1, 0]
@L Map each of the above to...
"x-\n| " ... [x, -, newline, |, space]
s Concatenate into string
p Print without newline
_ Reverse
t All but first character, implicit print
-1 바이트 덕분에 @AdmBorkBork
('------x------','| | x | |','| |--x--| |')[0,1+2..0]
[0,1+2..0]
string a="------x------\n",b="| | x | |\n";Console.Write(a+b+"| |--x--| |\n"+b+a);언 골프 드 :
string a = "------x------\n",
b = "| | x | |\n";
Console.Write(a + b + "| |--x--| |\n" + b + a);
adrianmp의 답변을 기반으로 익명의 기능을 사용하는 다른 방법이 있습니다.첫 번째 Let 's Play Tennis 스레드의 을 같습니다.
()=>{string a="------x------\n",b="| | x | |\n";return(a+b+"| |--x--| |\n"+b+a);};언 골프 드 :
() =>
{
string a = "------x------\n",
b = "| | x | |\n";
return(a + b + "| |--x--| |\n" + b + a);
};해결책:
"x-| "@4\:509 425 477 0@4\:17218113
예:
q)k)"x-| "@4\:509 425 477 0@4\:17218113
"------x------"
"| | x | |"
"| |--x--| |"
"| | x | |"
"------x------"
설명:
배열에 인덱스 목록을 생성하려고합니다 "x-| ". 예 :
1 1 1 1 1 1 0 1 1 1 1 1 1
2 3 3 2 3 3 0 3 3 2 3 3 2
2 3 3 2 1 1 0 1 1 2 3 3 2
2 3 3 2 3 3 0 3 3 2 3 3 2
1 1 1 1 1 1 0 1 1 1 1 1 1
이것을 생성하기 위해 우리는이 숫자들의 뒤집기의 기본 4 표현을 취할 수 있습니다. 이것은 우리에게 :
425 509 509 425 477 477 0 477 477 425 509 509 425
필요한 지수에서 고유 한 값과 색인을 취할 수 있습니다.
q)509 425 477 0@1 0 0 1 2 2 3 2 2 1 0 0 1
425 509 509 425 477 477 0 477 477 425 509 509 425
1 0 0 1 2 2 3 2 2 1 0 0 1base-4로 변환 된 이 배열 은
q)k)4/:1 0 0 1 2 2 3 2 2 1 0 0 1
17218113
따라서 솔루션의 경우 이러한 단계를 반대로 수행합니다.
"x-| "@4\:509 425 477 0@4\:17218113 / the solution
4\:17218113 / convert 17218113 into base-4
509 425 477 0@ / index (@) into 509 425 477 0
4\: / convert to base-4
"x-| "@ / index (@) into "x-| "