Tytuł mówi wszystko. Twoim celem jest napisanie programu, który utworzy aw × h prostokąta znaków, który można obracać i ponownie uruchomić, aby wygenerować liczbę wykonanych obrotów o 90 ° w kierunku przeciwnym do ruchu wskazówek zegara (CCW).

Na przykład, jeśli program 3 × 2

abc
def

rozwiązany problem, początkowo generowałby 0, a kolejne obroty o 90 ° CCW

cf    fed    da
be    cba    eb
ad           fc

wypisze odpowiednio 1, 2 i 3.

Używanie komentarzy sprawia, że ​​jest to trywialne zadanie w większości języków. Na przykład w Ruby można to zrobić w prostokącie 7 × 7:

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

Wyzwanie polega na zrobieniu tego bez żadnych komentarzy.

Punktacja

Twój wynik to w * h, obszar prostokąta. Nowe linie są wykluczone. Innymi słowy, code-golf, nowe linie nie są liczone.

Wynik dla przykładu Rubiego to 49 (choć oczywiście jest on nieprawidłowy, ponieważ zawiera komentarze).

Notatki

• Twój kod musi być naprawdę prostokątny bez brakujących znaków na końcu wiersza.
• Jeśli chcesz, możesz wypisać inne legalne wartości „mod 90 °” zamiast 0 1 2 3. Więc 8 jest w porządku zamiast 0, a -1 jest w porządku zamiast 3 itd.
• Dane wyjściowe mogą przejść do konsoli lub do pliku.
• Obowiązują standardowe luki.

Mam nadzieję, że moje pierwsze pytanie naprawdę intryguje niektórych ludzi. Cieszyć się!

APL (1x3 = 3)

5!3

To rozwiązanie wykorzystuje dodatkową zasadę, że każde wyjście, które jest poprawne mod 4 działa.

W APL x!yjest liczbą sposobów wybierania xelementów y, zwanych potocznie binom(y,x)lub choose(y,x). Sprawdźmy, czy każdy obrót daje prawidłową odpowiedź.

0 obrotów

5!3

Nie ma możliwości wybrania 5 elementów z 3, więc otrzymujemy 0, które jest automatycznie drukowane.

1 obrót w lewo

3
!
5

APL z radością ocenia każdą linię, uzyskując numer 3, operator !, a następnie numer 5, wypisując tylko ostatnią z nich ( 5), czyli 1 mod 4.

2 obroty w lewo

3!5

To jest binom(5,3), czyli (5*4*3*2*1)/(3*2*1)/(2*1) = 102 mod 4.

3 obroty w lewo

5
!
3

Tak jak poprzednio, tylko ostatnio oceniana wartość 3to drukarka.

Tak naprawdę nie znam APL, więc proszę powiedz mi, jeśli popełniłem błąd. Znalazłem to metodą prób i błędów jako pierwszego języka na tej stronie, który:

1. Automatycznie drukuje wynik wyrażenia
2. Biorąc pod uwagę wiele wierszy wyrażeń, wypisuje tylko ostatni
3. Nie ma problemu z operatorem stojącym samotnie na linii
4. Poprawiono operatorów
5. Ma arytmetyczny operator binarny o jednym znaku, który jest asymetryczny (aRb! = BRa) i wystarczająco elastyczny, aby zwracać różne liczby.

Dla (5) przeszedłem listę funkcji dyadycznych APL . Moją pierwszą operacją kandydującą była dzielenie całkowite /C i Python 2, ale podział APL ÷daje liczby zmiennoprzecinkowe . Potęgowanie jest kuszące, ale nie dlatego, że ai a^bmają ten sam parytet ale dostał przez kolejnych obrotów (chyba b=0, ale potem b^a=0). Operatory logiczne, takie jak <dawanie 0i 1odstęp 180 stopni, co nie działa. W końcu znalazłem operator dwumianowy !i wypróbowałem liczby, dopóki nie dostałem takiej pracy.

Dzięki Quincunx za jego pewność, że istnieje rozwiązanie mniejsze niż 2x2.

Rubinowy, 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 

Trochę dłużej niż inne rozwiązanie, ale przynajmniej to rozwiązanie nie zależy od jakiegokolwiek niejawnego drukowania lub nadużycia reguł. Dla wszystkich czterech obrotów cały kod jest analizowany, a poza zwarciem wszystkie są wykonywane. Co zaskakujące, w kodzie absolutnie nie ma symetrii

To rozwiązanie polega na tym, że nadal można wywołać pfunkcję (która służy do drukowania liczb), nawet jeśli zmienna o tej samej nazwie została już zdefiniowana. Na przykład coś takiego p pwywołuje funkcję pze zmienną pjako argumentem (w ten sposób wypisuje wartość p).

Wyjaśnienie niektórych typowych wyrażeń używanych w kodzie:

• p: Jak wspomniano powyżej, jest to wywołanie funkcji lub zmienna. Gdy zmienna nie jest zdefiniowana, wywołuje to funkcję pbez argumentów, co nic nie robi i zwraca nil.
• p p: Drukuje zmienną p.
• p|x: Kiedy pjest funkcją, jest identyczna z nil|x, która zwraca true / false w zależności od wartości x. Jeśli pjest liczbą całkowitą, jest bitowa lub. Tak czy inaczej, to stwierdzenie nie ma skutków ubocznych.
• p=p||x: Efektywnie taki sam jak p||=x(przypisanie warunkowe) z tą zaletą, że jest poprawny pod względem składniowym i nie ma możliwości odwrócenia.

Wersja symetryczna (9 × 10 = 90)

    p    

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

    p    

Jest to najkrótsze rozwiązanie symetryczne (C ₂ przy ignorowaniu liczb do wydrukowania), jakie mogłem wymyślić.

Skrypt testowy

Oto skrypt testowy do weryfikacji powyższego kodu ( #na końcu linii zostały dodane, aby białe znaki nie zostały usunięte i zostały usunięte przed wykonaniem):

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

Drukuje, 4312co jest 0(mod 4). Drukowane są rotacje 3241(1 mod 4), 2134(2 mod 4) i 1423(3 mod 4).

Zainicjowane przez:

Jeśli chcesz, możesz wypisać inne legalne wartości „mod 90 °” zamiast 0 1 2 3. Więc 8 jest w porządku zamiast 0, a -1 jest w porządku zamiast 3 itd.

W rzeczywistości istnieje wiele zestawów liczb, dla których to działa. Znalazłem je w tym programie Python:

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))

Chociaż program wypisuje 0s (co prawdopodobnie nie działałoby), prawidłowe rozwiązania mają formę

ab
cd

Gdzie a∈{4,8}, b∈{3,7}, c∈{1,5,9}, d∈{2,6}. IE, (a,b,c,d)∈{4,8}×{3,7}×{1,5,9}×{2,6}czyli 24 rozwiązania.

Python - 23 x 23 = 529

Ok, to pytanie ma już zwycięzcę, ale nie ma jeszcze rozwiązania w języku Python. Więc pomyślałem o tym - ciężko! - i znalazł sposób na sprawienie, by nieporęczne printpolecenie działało w dowolnym kierunku, nie powodując błędów po przeanalizowaniu z jednego z pozostałych kierunków.

Przełomem była następująca linia:

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

Podczas forward_codewykonywania backward_codejest częścią ciągu i dlatego nie jest drukowana. To jest dokładnie na odwrót podczas czytania wstecz.

Tak więc w połączeniu z dwoma dodatkowymi kierunkami i dopracowanymi, aby uzyskać prawidłowe dopasowanie wszystkich cytatów, otrzymuję następujące rozwiązanie:

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

Edycja: Znalazłem sposób na poradzenie sobie z tą białą spacją. ;)

BASIC, 64

Nie wygra, ale i tak jest. (Testowany w Chipmunk Basic )

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

Uwaga: ?jest skrótem PRINTw różnych dialektach języka BASIC. Chociaż w kodzie jest wiele błędów składniowych, ENDinstrukcja w pierwszym wierszu uniemożliwia ich odczytanie przez interpretera.

Pyth , 9 znaków (3x3)

0 1

3 2

W pyth wszystko jest drukowane domyślnie, chyba że jest poprzedzone spacją. Linie po pierwszym wierszu służą do wprowadzania danych przez użytkownika i nie są oceniane w tym programie.

Kolejny sposób na uzyskanie 9 znaków:

"0"
3 1
"2"

Pyth 1.0.5 , 4 znaki

Podczas gdy ostatnie zmiany w Pyth utrudniają generowanie liczb dwucyfrowych (zmiana, którą rozważam cofnąć), starsze wersje Pytha mają łatwe generowanie liczb dwucyfrowych, co w połączeniu z niejawnym drukowaniem i faktem, że wszystkie linie oprócz pierwszej są ignorowane, daje następujące rozwiązanie:

32
41

Drukuje 32,1,14,43.

Befunge, 16 lat

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

Objaśnienie: Cyfry od, 0aby 9wypchnąć odpowiednią liczbę na stos, .wyskakuje wartość ze stosu i drukuje ją jako liczbę całkowitą, a następnie @kończy program.

(testowane tutaj )

Piet, 49

Postanowiłem tylko użyć żółtych i czerwonych kolorów i postarać się, aby był mniej więcej symetryczny. Po obróceniu drukuje 0, 1, 2 lub 3. Wyjście z programu w Piet jest trudne i niestety zajmuje około połowy miejsca na zdjęciu.

GNU dc , 6 (3x2)

Myślę, że jest to najkrótsza odpowiedź, aby nie wymagać relaksacji reguły „mod 90 °”:

3z1
0p2

Wyjścia 0, 1, 2albo 3na każdy obrót.

Dla 0, 2i 3rotacją po pprostu wyskakuje i drukuje ostatni numer dosłownego zostały zepchnięte na stosie. W celu 1obrotu zwypycha bieżącą głębokość stosu (1) na stos, a następnie pwyskakuje i drukuje go.

GolfScript, 9 (3x3)

0}1
} }
3}2

Coś w rodzaju nadużywania zasad. }Zdarza, aby zakończyć program, jeśli nie ma dopasowania {, a zawartość stosu są drukowane na końcu programu.

JavaScript, 4

03
12

Po uruchomieniu tego programu (lub rotacji tego programu) w konsoli javaScript, tylko ostatni wiersz jest oceniany i powtarzany w konsoli.

Więc:

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

Oto wszystkie podobne programy 2x2, które również działają:

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

Innymi słowy

ab
cd

gdzie a jest w [0,4,8], b jest w [3,7], c jest w [1,5,9], a d jest w [2,6]

CJam / GolfScript - 3 * 3

2;3
;7;
1;0

Średnik pokazuje poprzedni numer, dlatego drukowany jest tylko prawy dolny róg.

Aheui , 8

바몽희뷸
뷷희몽반

Ponieważ Aheui nie ma litery, która wypycha 1 na stos, postanowiłem wydrukować 0, 5, 2 i 3.

Objaśnienie: 바 i 반 wciskają odpowiednio 0 i 2 na stos i przesuwają kursor w prawo o jeden znak. 뷸 i 뷷 pchają odpowiednio 5 i 3 na stos i przesuwają kursor w dół o dwa znaki. 몽 wyskakuje i drukuje liczbę na stosie i przesuwa kursor o jeden znak w górę. 희 kończy program.

JavaScript

(Wprowadzony do konsoli przeglądarki, powłoki lub innej REPL, więc wynik jest drukowany)

1+2
-3-
4+5

Powinien działać dla każdego innego języka z wyrażeniami, nieistotnymi znakami nowej linii i automatycznym drukowaniem wyniku.

Matlab / Octave - 144 100

Gra w golfa: 10 x 10 = 100

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

Alternatywne rozwiązanie: 15 x 15 = 225

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

Perl 5x7 (35)

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

Trochę późno na imprezę. Samotnik -określa, która liczba jest drukowana.

JavaScript, 3

2
1
4

Działa ... w bazie 7.

Wersja Base 9:

2
7
0

Wyjaśnienie

Gdy zostanie uruchomiony interaktywnie, np. Z konsoli debugowania, zostanie wyświetlona wartość ostatniej instrukcji / wyrażenia.

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

Podobne rozwiązania można znaleźć dla dowolnej nieparzystej bazy.

Befunge, 12 (6x2)

Udało mi się wprowadzić niewielką poprawę w stosunku do istniejącej odpowiedzi Befunge, wykorzystując w pełni dwuwymiarowy charakter Befunge i ustawiając ścieżkę kodu pionowo w dwóch orientacjach.

0.@.1v
v3.@.2

Wypróbuj online: od 0 , obrót 1 , obrót 2 , obrót 3 .

Cudowny, 7 * 14 = 98

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

Argh! / Aargh! (4 * 4 = 16)

O co chodziło z użyciem odpowiedniego narzędzia do pracy? Brak komentarzy (ogólnie w języku).

Cała rodzina programów (wygenerowana w J: ((|.@:|:) ^: (i. 4)) >'hpqh';'q01p';'p32q';'hqph'lub ((|.@:|:) ^: (i. 4)) 4 4 $ 'hpqhq01pp32qhqph')

hpqh
q01p
p32q
hqph

obrócony raz:

hpqh
q12p
p03q
hqph

obrócony dwukrotnie:

hpqh
q23p
p10q
hqph

obrócony trzykrotnie:

hpqh
q30p
p21q
hqph

Aby to wyjaśnić, najlepiej sprawdzić wersję „wciętą” (która działa również we wszystkich rotacjach):

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

Ta wersja pokazuje, że program składa się z 4 oddzielnych części, po jednej na każdy obrót.

• h - ustawić przepływ sterowania w lewo

• p - wydrukuj element w rastrze danych / kodu poniżej

• q - wyjść z programu

Pływak - 9 × 5 = 45

Drukuje 4, 1, 2 lub 3 na konsoli.

Zauważ, że „czarny” jest prawidłową instrukcją (NOP) i jest składniowy. Bez tego nie może znaleźć pozycji wyjściowej. Zatem wszystkie pozycje w prostokącie są zajęte.

Element, 2x3 = 6

1*
`2
3 

Jest to poprawa w stosunku do naiwnego rozwiązania 3x3, które ma `pośrodku z liczbą po każdej stronie. Przypadek 0, pokazany powyżej, jest najbardziej interesujący, ponieważ* służy do pomnożenia 3 przez nic, aby uzyskać 0. Poza tym, nie jest to takie skomplikowane.

Jeśli uważasz, że przestrzeń jest niezręczna, możesz ją zastąpić dowolną inną postacią, z wyłączeniem []{}`_ .

Dla porównania, oto pozostałe trzy obroty:

case 1
*2 
1`3

case 2
 3
2`
*1

case 3
3`1
 2*

Chip, (2x5) 10

b~
+a
~t
e*
 f

*aktywuje wszystkie sąsiadujące elementy: północ, wschód, południe i zachód (źródło),
~jeśli nie jest aktywowane od zachodu, aktywuje wschodniego sąsiada (brama NIE) (nigdy tu nie aktywowana)
tprzerywa wykonywanie po wydrukowaniu bieżących
azestawów bajtów bit zestawów 0x01wyjściowych
bbit 0x02wyjścia
eustawia bit 0x10wyjścia
fustawia bit 0x20wyjścia
+ jeśli jest aktywowany przez dowolnego sąsiada, uaktywnij wszystkich innych sąsiadów (drut)

Chip wymaga -wflagi (aby umożliwić wykonanie bez danych wejściowych) lub danych wejściowych w celu uruchomienia.

Reprodukcje 0, 1, 2, lub 3w kodzie ASCII. Jeśli punkty kodowe 0x00do 0x03są pożądane, usunąć ei f, a następnie przenieść przestrzeń do wypełnienia luki.

Japt , 3 * 1 = 3 bajty

5zB

Wypróbuj online: jak jest , obrócony raz , dwa razy , trzy razy .

Wyjścia odpowiednio 0, 5, 2, 11.

Zmienna Bma wartość 11 i Number.z(other)jest podziałem podłogi (wszyscy wyglądali najwyraźniej: p). W przypadku kodu wieloliniowego ostatni wiersz jest przekazywany do wyjścia, co jest tutaj po prostu stałą.

2 * 2 = 4 bajty

2J
1T

Wypróbuj online: jak jest , obrócony raz , dwa razy , trzy razy .

Wyjścia odpowiednio 0, 21, 2, -1.

Ttrzyma 0 i Jtrzyma -1.

Sztuczka polega na tym, że jeśli dwa literały lub zmienne są umieszczone obok siebie, wstawiany jest przecinek, a wynik jest tylko ostatnim.

2 * 2 Rozwiązanie JS działa również w Japt.