제목이 다 나와 있습니다. 당신의 목표는 회전하고 다시 실행할 수있는 aw x h 직사각형의 문자를 형성하는 프로그램을 작성하여 수행 된 90 ° 반 시계 방향 (CCW) 회전 수를 출력하는 것입니다.

예를 들어, 3 × 2 프로그램 인 경우

abc
def

문제를 해결하고 처음에는 0을 출력하고 90 ° CCW의 연속 회전

cf    fed    da
be    cba    eb
ad           fc

1, 2 및 3을 각각 출력합니다.

주석을 사용하면이 작업이 대부분의 언어가됩니다. 예를 들어 루비에서는 7x7 사각형으로 할 수 있습니다.

###p###
### ###
###1###
p 0#2 p
###3###
### ###
###p###

문제는 어떤 종류의 주석 없이이 작업을 수행 하는 것입니다.

채점

당신의 점수는 w * h, 사각형의 면적입니다. 개행은 제외됩니다. 즉, 코드 골프 줄 바꿈은 계산되지 않습니다.

Ruby 예제의 점수는 49 점입니다 (물론 주석이 있으므로 유효하지 않습니다).

노트

• 코드는 실제로 줄 끝에 문자가 없어야하는 직사각형이어야합니다.
• 원하는 경우 0 1 2 3 대신 다른 유효한 "mod 90 °"값을 출력 할 수 있습니다. 따라서 0 대신 8이 좋고 3이 아닌 -1이 좋습니다.
• 출력은 콘솔 또는 파일로 갈 수 있습니다.
• 표준 허점이 적용됩니다.

나는 이것이 나의 첫 번째 질문이 실제로 어떤 사람들에게 흥미를 갖기를 바랍니다. 즐겨!

APL (1x3 = 3)

5!3

이 솔루션은 올바른 모드 4 인 모든 출력이 작동한다는 추가 규칙을 사용합니다.

APL에서는 일반적으로 또는 로 알려진 요소 x!y를 선택할 수있는 방법 입니다. 각 회전이 올바른 답을 제공하는지 확인합시다.xybinom(y,x)choose(y,x)

0 회전

5!3

3에서 5 개의 요소를 선택할 수있는 방법이 없으므로 0이 자동으로 인쇄됩니다.

1 CCW 회전

3
!
5

APL은 각 행을 행복하게 평가하여 number 3, operator !, number를 가져 와서 5마지막 마지막 ( 5) 인 1 mod 4 만 인쇄합니다 .

2 CCW 회전

3!5

이다 binom(5,3)인, (5*4*3*2*1)/(3*2*1)/(2*1) = 102 모드 4이다.

3 CCW 회전

5
!
3

이전과 마찬가지로 마지막으로 평가 된 값만 3프린터입니다.

실제로 APL을 모르므로 설명에 문제가 있으면 알려주십시오. 이 사이트 의 첫 번째 언어로 시행 착오를 통해 그것을 발견했습니다 .

1. 식의 결과를 자동으로 인쇄
2. 여러 줄의 표현식이 주어지면 마지막 줄만 출력합니다.
3. 작업자가 한 줄에 혼자 서있는 경우 문제가 없습니다
4. 연산자를 가져옵니다
5. 비대칭 (aRb! = bRa)이고 다양한 숫자를 반환 할 수있을 정도로 유연한 단일 문자 산술 이진 연산자가 있습니다.

(5)의 경우 APL dyadic 함수 목록으로 내려갔습니다 . 첫 번째 후보 작업은 /C와 Python 2 의 정수 나누기 이지만 APL 나누기 ÷는 부동 소수점을 제공합니다. 지수는 유혹 때문이 아니라 실패 a와 a^b같은 패리티를 가지고 있지만 연속 회전 (하지 않는 한에 의해 입수되는 b=0,하지만 b^a=0). <give 0및 1180도 간격 과 같은 부울 연산자 는 작동하지 않습니다. 마지막으로 이항 연산자를 찾았습니다.! 일부를 얻을 때까지 숫자를 시도했습니다.

Quincunx에게 2x2보다 작은 솔루션이 있다고 확신 해주셔서 감사합니다.

루비, 7 × 9 (63)

 30;p  
0||p=p 
0|0;p;p
;p;p|p;
p=p ||0
;p   p;
2||p =p
 00;1  
     p 

다른 솔루션보다 조금 길지만 적어도이 솔루션은 암시 적 인쇄 또는 규칙 남용에 의존하지 않습니다. 네 회전 모두에 대해 전체 코드가 파싱되고 일부 단락 이외의 모든 코드가 실행됩니다. 놀랍게도 코드에는 절대 대칭이 없습니다

이 솔루션은 p같은 이름의 변수가 이미 정의 된 경우에도 함수 를 호출 할 수 있다는 사실에 의존 합니다 (숫자를 인쇄하는 데 사용됨). 예를 들어, 변수 를 인수로 사용 p p하여 함수 p를 호출하는 것 p(따라서 값을 인쇄 p)

코드에서 사용되는 일부 공통 표현식에 대한 설명 :

• p: 위에서 언급했듯이 이것은 함수 호출이거나 변수입니다. 변수가 정의 p되어 있지 않으면 인수없이 함수 를 호출하여 아무것도 수행하지 않고를 반환합니다 nil.
• p p: 변수를 인쇄합니다 p.
• p|x: p함수 인 경우이 값과 동일 nil|x하며 값에 따라 true / false를 반환합니다 x. p정수인 경우 비트 단위입니다. 어느 쪽이든,이 진술은 부작용이 없습니다.
• p=p||x: p||=x구문 상 유효하고 반대로 전환 할 수 없다는 이점이있는 (조건부 할당)과 사실상 동일 합니다.

대칭 버전 (9 × 10 = 90)

    p    

  0 * 0  
  00100  
  0||2* p
p *0||0  
  00300  
  0 * 0  

    p    

가장 짧은 대칭 솔루션입니다 (C ₂ 인쇄 할 숫자를 무시할 때 ).

테스트 스크립트

다음은 위 코드를 확인하는 테스트 스크립트입니다 ( #행 끝에 공백이 제거되어 실행 전에 제거되도록 행 끝에 추가됨).

rotate=->s{s.split($/).map{|i|i.chars.reverse}.transpose.map(&:join).join($/)}

s=<<EOD.gsub(?#,"")
 30;p  #
0||p=p #
0|0;p;p#
;p;p|p;#
p=p ||0#
;p   p;#
2||p =p#
 00;1  #
     p #
EOD


puts ">>> 0°"
eval s
puts ">>> 90°"
eval rotate[s]
puts ">>> 180°"
eval rotate[rotate[s]]
puts ">>> 270°"
eval rotate[rotate[rotate[s]]]

GolfScript, 4 (2x2)

43
12

인쇄 4312이다 0(모드 4). 회전 인쇄 3241(1 mod 4), 2134(2 mod 4) 및1423 (3 mod 4).

프롬프트 :

원하는 경우 0 1 2 3 대신 다른 유효한 "mod 90 °"값을 출력 할 수 있습니다. 따라서 0 대신 8이 좋고 3이 아닌 -1이 좋습니다.

실제로 이것이 작동하는 많은 숫자 세트가 있습니다. 이 파이썬 프로그램에서 이것을 발견했습니다.

def f(a,b,c,d):
    return int("%i%i%i%i"%(a,b,c,d))
for a in range(10):
    for b in range(10):
        for c in range(10):
            for d in range(10):
                candidate = f(a,b,c,d) % 4 == 0
                candidate &= f(b,d,a,c) % 4 == 1
                candidate &= f(d,c,b,a) % 4 == 2
                candidate &= f(c,a,d,b) % 4 == 3
                if candidate:
                    print("%i, %i, %i, %i"%(a,b,c,d))

프로그램이 0s를 출력하지만 (아마도 작동하지 않을 수 있음) 유효한 솔루션은 다음과 같은 형식입니다.

ab
cd

어디 a∈{4,8}, b∈{3,7}, c∈{1,5,9}, d∈{2,6}. (a,b,c,d)∈{4,8}×{3,7}×{1,5,9}×{2,6}24 솔루션 인 IE .

파이썬-23 x 23 = 529

좋아,이 질문은 이미 승자가되었지만 Python 솔루션은 아직 없습니다. 그래서 나는 그것에 대해 생각했습니다-심하게! - print다른 방향 중 하나에서 구문 분석 할 때 부피가 큰 명령을 오류없이 생성 하는 방법을 찾았습니다 .

돌파구는 다음과 같습니다.

'"\'';forward_code;"';backward_code;""\'"''

forward_code이 실행되는 동안backward_code 문자열의 일부이므로 인쇄되지 않습니다. 이것은 뒤로 읽을 때 정확히 다른 방법입니다.

따라서 두 가지 방향을 더하고 미세 조정하여 모든 따옴표가 올바르게 일치하도록 조정하면 다음 솔루션으로 끝납니다.

''"''""''"''"''"'"''""'
"  ""                 "
"  \\                 "
'"\'';print 1;"'""\'"''
'"\''"';3 tnirp;""\'"''
"  ;""                "
"  p'                 "
'  r;                 '
'  i2                 '
"  n                  "
"  tt                 "
'   n                 '
'  4i                 '
"  ;r     .-=<>=-.    "
' \"p    /__----__\   '
"  ';'  |/ (')(') \|  "
"  ""    \   __   /   "
'  ""    .`--__--`.   '
"  \\   /    :|    \  "
'  ''  (_)   :|   (_) '
'  ""    |___:|____|  '
"  ''    |_________|  "
''"''""''"''"''"'"''""'

편집 : 모든 공백을 처리하는 방법을 찾았습니다. ;)

기본, 64

이길 수는 없지만 어쨌든 여기 있습니다. ( Chipmunk Basic 에서 테스트 )

?0:END:?
:::::::1
D:::::::
N::::::E
E::::::N
:::::::D
3:::::::
?:DNE:2?

참고 : BASIC의 다양한 방언에서 사용되는 ?축약 형입니다 PRINT. 코드에 많은 구문 오류가 있지만 END첫 번째 행 의 명령문으로 인해 인터프리터가이를 볼 수 없습니다.

Pyth , 9 자 (3x3)

0 1

3 2

pyth에서는 공백이 앞에 있지 않으면 모든 것이 기본적으로 인쇄됩니다. 첫 번째 줄 다음 줄은 사용자 입력 용이며이 프로그램에서는 평가되지 않습니다.

9자를 얻는 다른 방법 :

"0"
3 1
"2"

피스 1.0.5 , 4 자

pyth에 대한 최근 변경으로 인해 두 자리 숫자를 생성하기가 더 어려워졌지만 (복귀하려는 변경 사항) 이전 버전의 Pyth는 두 자리 숫자를 쉽게 생성 할 수 있습니다. 무시되고 다음 해결책을 제공합니다.

32
41

32,21,14,43을 인쇄합니다.

베 펀지, 16

0.@1
@@@.
.@@@
3@.2

설명 : 행 디지트 0하는 9스택에 대응하는 숫자를 눌러, .스택으로부터 값을 팝하고 정수로 출력하고,@ 프로그램을 종료한다.

( 여기에서 테스트 )

피에트, 49

나는 노랗고 붉은 색만을 사용하고 대략 대칭 적으로 만들려고 노력했습니다. 회전하면 0, 1, 2 또는 3을 인쇄합니다. Piet에서 프로그램을 종료하는 것은 어렵고 불행히도 그림의 공간의 절반 정도를 차지합니다.

GNU DC , 6 (3x2)

이것이 "mod 90 °"규칙 완화를 요구하지 않는 가장 짧은 대답이라고 생각합니다.

3z1
0p2

출력 0, 1, 2또는 3각 회전.

를 들어 0, 2및 3회전의는 p단순히 팝업 스택에 푸시 된 리터럴 마지막 번호를 인쇄합니다. 용 1회전 상기 z스택에 푸시 현재 스택 깊이 (1) 다음 p꺼내어 인쇄 그것을.

GolfScript, 9 (3x3)

0}1
} }
3}2

규칙을 남용하는 것. 은 }일치가 존재하지 않는 경우, 프로그램을 종료하는 일 {, 및 스택의 콘텐츠는 프로그램의 마지막에 인쇄된다.

자바 스크립트, 4

03
12

javaScript 콘솔에서이 프로그램 (또는이 프로그램의 회전)을 실행하면 콘솔에서 마지막 줄만 평가되고 에코됩니다.

그래서:

12 modulo 4 == 0
01 modulo 4 == 1
30 modulo 4 == 2
23 modulo 4 == 3

다음은 작동하는 유사한 2x2 프로그램입니다.

03
12

03
16

03
52

03
56

03
92

03
96

07
12

07
16

07
52

07
56

07
92

07
96

43
12

43
16

43
52

43
56

43
92

43
96

47
12

47
16

47
52

47
56

47
92

47
96

83
12

83
16

83
52

83
56

83
92

83
96

87
12

87
16

87
52

87
56

87
92

87
96

다른 말로하면

ab
cd

여기서 a는 [0,4,8]에 있고 b는 [3,7]에 있고, c는 [1,5,9]에 있으며, d는 [2,6]에 있습니다

CJam / GolfScript-3 * 3

2;3
;7;
1;0

세미콜론은 이전 숫자를 표시하므로 오른쪽 하단 만 인쇄됩니다.

아 헤이 , 8

바몽희뷸
뷷희몽반

Aheui에는 스택에 1을 넣는 문자가 없으므로 0, 5, 2 및 3을 인쇄하기로 결정했습니다.

설명 : 바와 반은 각각 0과 2를 스택에 누르고 커서를 한 문자 씩 오른쪽으로 이동합니다. 뷸 및 뷷는 각각 스택에 5와 3을 누르고 커서를 두 문자 아래로 내립니다. 몽은 스택에 숫자를 표시하고 인쇄하고 커서를 한 문자 씩 위로 이동합니다. 희 프로그램을 종료합니다.

자바 스크립트

(브라우저 콘솔, 쉘 또는 다른 REPL에 입력되어 결과가 인쇄 됨)

1+2
-3-
4+5

표현, 중요하지 않은 줄 바꿈 및 결과 자동 인쇄 기능을 갖춘 다른 언어에서도 작동합니다.

MATLAB / 옥타브 -144 (100)

골프 : 10 x 10 = 100

....d.....
....i.....
....s.....
... p2 ...
disp  1...
...3  psid
... 4p ...
.....s....
.....i....
.....d....

대체 솔루션 : 15 x 15 = 225

.......d.......
.......i.......
.......s.......
...    p    ...
...         ...
...    4    ...
...    .    ...
disp 1...3 psid
...    .    ...
...    2    ...
...         ...
...    p    ...
.......s.......
.......i.......
.......d.......

펄 5x7 (35)

1+p+t+1
-print+
1+i+i+1
+tnirp+
1+t+p+1

파티에 조금 늦었 어 독방에 -따라 인쇄 할 번호가 결정됩니다.

자바 스크립트, 3

2
1
4

기본 7에서 작동합니다.

기본 9 버전 :

2
7
0

설명

예를 들어 디버깅 콘솔에서 대화식으로 실행하면 마지막 명령문 / 식의 값이 출력됩니다.

4 ₇ = 4 ₁₀ ≣ 0 (mod 4 )
412 ₇ = 205 ₁₀ ≣ 1 (mod 4 )
2 ₇ = 2 ₁₀ ≣ 2 (mod 4 )
214 ₇ = 109 ₁₀ ≣ 3 (mod 4 )

홀수 기반에 대해 비슷한 솔루션을 찾을 수 있습니다.

베 펀지, 12 (6x2)

나는 Befunge의 2 차원 적 특성을 최대한 활용하고 두 방향에서 코드 경로를 수직으로 실행함으로써 기존 Befunge 답변을 약간 개선했습니다.

0.@.1v
v3.@.2

온라인 시작 : 0 , 회전 1 , 회전 2 , 회전 3 .

놀라운, 7 * 14 = 98

.. \/ \/ .. ..
.. 31 \\ 32 \/
\/ \\ \/ \\ \/
\/ 30 \\ 33 ..
.. .. \/ \/ ..

아아!(4 * 4 = 16)

업무에 적합한 도구를 사용하는 것은 어떻습니까? 의견이 없습니다 (일반적인 언어).

전체 프로그램 제품군 (J : ((|.@:|:) ^: (i. 4)) >'hpqh';'q01p';'p32q';'hqph'또는 에서 생성됨 ((|.@:|:) ^: (i. 4)) 4 4 $ 'hpqhq01pp32qhqph')

hpqh
q01p
p32q
hqph

한 번 회전 :

hpqh
q12p
p03q
hqph

두 번 회전 :

hpqh
q23p
p10q
hqph

세 번 회전 :

hpqh
q30p
p21q
hqph

이를 설명하기 위해 "들여진"버전을 보는 것이 가장 좋습니다 (모든 회전에서 작동 함).

hhpq h
  0  h
q   1p
p3   q
h  2  
h qphh

이 버전은 프로그램이 개별 회전마다 하나씩 4 개의 개별 부품으로 구성되어 있음을 보여줍니다.

• h -제어 흐름을 왼쪽으로 설정

• p -아래 데이터 / 코드 래스터로 항목 인쇄

• q -프로그램을 종료

플로터 -9 × 5 = 45

콘솔에 4, 1, 2 또는 3을 인쇄합니다.

'검은 색'은 유효한 명령어 (NOP)이며 구문입니다. 그것 없이는 시작 위치를 찾을 수 없습니다. 따라서 사각형의 모든 위치가 사용됩니다.

요소, 2x3 = 6

1*
`2
3 

이것은 3x3 순진한 솔루션보다 개선 된 `것으로, 중간에 양쪽에 숫자가 있습니다. 위에 표시된 0의 경우가 가장 흥미 롭습니다.* 을 얻기 위해 아무것도 3을 곱하는 데 사용 그 외에는 그렇게 복잡하지 않습니다.

공간이 어색한 것을 발견하면 거의 다른 문자로 바꿀 수 있습니다. []{}`_ .

참고로 다른 세 회전은 다음과 같습니다.

case 1
*2 
1`3

case 2
 3
2`
*1

case 3
3`1
 2*

칩, (2x5) 10

b~
+a
~t
e*
 f

*모든 이웃 요소를 활성화합니다 :
~서쪽에서 활성화되지 않은 경우 북쪽, 동쪽, 남쪽 및 서쪽 (소스) , 동쪽 이웃을 활성화합니다 (NOT- 게이트) (여기서 활성화되지 않음)
t현재 바이트
a세트를 인쇄 한 후 실행을 종료 0x01합니다. 출력
b세트 의 비트 세트 0x02출력 비트 는 출력
e비트 0x10를
f설정합니다 0x20. 출력 비트 는 출력 비트 를 설정합니다.
+ 이웃에 의해 활성화 된 경우 다른 모든 이웃을 활성화하십시오 (와이어)

칩에는 -w플래그없이 (입력없이 실행할 수 있도록) 또는 실행하기 위해 일부 입력이 필요합니다.

인쇄 0, 1, 2, 또는 3ASCII있다. 코드 포인트가 경우 0x00에 0x03요구되는의를 제거 e하고 f다음의 격차를 채우기 위해 공간을 이동합니다.

Japt , 3 * 1 = 3 바이트

5zB

온라인을보십시오 : 있는 그대로 , 한 번 회전 , 두 번 , 세 번 .

0, 5, 2, 11을 각각 출력합니다.

변수 B는 값 11을 보유하며 Number.z(other)바닥 분할입니다 (모두 분명히 : p를 찾았습니다). 여러 줄 코드의 경우 마지막 줄이 출력으로 전달됩니다. 여기서는 단순히 상수입니다.

2 * 2 = 4 바이트

2J
1T

온라인을보십시오 : 있는 그대로 , 한 번 회전 , 두 번 , 세 번 .

0, 21, 2, -1을 각각 출력합니다.

T0을 J보유하고 -1을 보유합니다.

트릭은 두 리터럴 또는 변수를 나란히 놓으면 쉼표가 삽입되고 출력은 마지막 것입니다.

2 * 2 JS 솔루션 은 Japt에서도 작동합니다.