Wprowadzenie:

Rzućmy okiem na standardowy kalkulator w systemie Windows: w przypadku tego wyzwania przyjrzymy się tylko następującym przyciskom i zignorujemy wszystko inne:

7 8 9 /
4 5 6 *
1 2 3 -
0 0 . +

Wyzwanie:

Wejście:
Otrzymasz dwa wejścia:

• Jednym z nich jest wskazanie obrotu w krokach co 90 stopni
• Druga to lista współrzędnych reprezentujących przyciski naciskane na obróconym kalkulatorze.

Na podstawie pierwszego wejścia obracamy powyższy układ zgodnie z ruchem wskazówek zegara w krokach co 90 stopni. Więc jeśli dane wejściowe są 0 degrees, pozostają niezmienione; ale jeśli wejście jest 270 degrees, zostanie ono obrócone trzy razy w prawo (lub raz w lewo). Oto cztery możliwe układy:

Default / 0 degrees:
7 8 9 /
4 5 6 *
1 2 3 -
0 0 . +

90 degrees clockwise:
0 1 4 7
0 2 5 8
. 3 6 9
+ - * /

180 degrees:
+ . 0 0
- 3 2 1
* 6 5 4
/ 9 8 7

270 degrees clockwise / 90 degrees counterclockwise:
/ * - +
9 6 3 .
8 5 2 0
7 4 1 0

Drugim wejściem jest lista współrzędnych w dowolnym rozsądnym formacie † . Na przykład (tablica liczb całkowitych 2D 0 z indeksem):

[[1,2],[2,3],[0,3],[1,0],[1,1]]

Wyjście: Wyprowadzamy
zarówno sumę, jak i wynik (i znak równości =).

Przykład:
Jeśli więc wejściem jest 270 degreesi [[1,2],[2,3],[0,3],[1,0],[1,1]], wyjściem będzie:

517*6=3102

Zasady konkursu:

• † Dane wejściowe mogą mieć dowolny rozsądny format. Pierwsze wejście może być 0-3, 1-4, A-D, 0,90,180,270, itd. Drugie wejście może być 0-indeksowane tablicę 2D, 1-indeksowane tablica 2D, String, lista obiektów punktowej, itd rozmowy. Możliwe jest nawet zamianę współrzędnych xiy w porównaniu z podanymi przykładowymi danymi wejściowymi. Podaj formaty wejściowe, których użyłeś w swojej odpowiedzi!
• Możesz dodawać spacje (tzn. 517 * 6 = 3102Jeśli chcesz).
• Możesz dodać końcowe zera po przecinku, maksymalnie do trzech (tj. 3102.0/ 3102.00/ 3102.000Zamiast 3102lub 0.430zamiast 0.43).
• Nie możesz dodawać nawiasów w danych wyjściowych, więc (((0.6+4)-0)/2)/4=0.575nie jest to poprawny wynik.
• Możesz używać innych symboli operandów w swoim języku. Tak ×lub ·zamiast *; lub ÷zamiast /; itp.
• Ponieważ kalkulator automatycznie oblicza przy wprowadzaniu argumentu, należy zignorować pierwszeństwo operatora!Tak 10+5*3spowoduje 45( (10+5)*3=45), a nie 25( 10+(5*3)=25)
  (tj 10→ +→ 5→ *(obecnie 15 wyświetla się na wyświetlaczu) → 3→ =(teraz wyświetla odpowiedź 45)). Należy o tym pamiętać podczas korzystania evali podobnych funkcji na wynikowej sumie.
• Nie będzie żadnych przypadków testowych do dzielenia przez 0.
• Nie będzie żadnych przypadków testowych zawierających więcej niż trzy cyfry dziesiętne, więc nie trzeba zaokrąglać wyniku.
• Nie będzie żadnych przypadków testowych, w których wiele operandów podąży za sobą, lub w których dwie kropki będą podążać za sobą.
• Nie będzie żadnych przypadków testowych dla liczb ujemnych. Znak minus ( -) będzie używany tylko jako operand, a nie jako ujemny.
• .##Przed przecinkiem nie będzie żadnych przypadków testowych bez numeru wiodącego (tzn. 2+.7Nie będzie to prawidłowy przypadek testowy, ale 2+0.7może być).

Główne zasady:

• To jest golf golfowy , więc wygrywa najkrótsza odpowiedź w bajtach.
  Nie pozwól, aby języki kod-golfowe zniechęcały Cię do publikowania odpowiedzi w językach niekodujących golfa. Spróbuj znaleźć możliwie najkrótszą odpowiedź na „dowolny” język programowania.
• Do odpowiedzi odnoszą się standardowe reguły , więc możesz używać STDIN / STDOUT, funkcji / metody z odpowiednimi parametrami, pełnych programów. Twoja decyzja.
• Domyślne luki są zabronione.
• Jeśli to możliwe, dodaj link z testem swojego kodu.
• W razie potrzeby dodaj również wyjaśnienie.

Przypadki testowe:

Input:   270 degrees & [[1,2],[2,3],[0,3],[1,0],[1,1]]
Output:  517*6=3102

Input:   90 degrees & [[3,1],[0,0],[0,1],[3,3],[2,0],[0,3],[0,0],[0,2],[3,0],[2,1]]
Output:  800/4+0.75=200.75

Input:   0 degrees & [[0,0],[1,0],[2,0],[3,0],[1,2],[2,1],[2,2]]
Output:  789/263=3

Input:   180 degrees & [[3,0],[1,0],[1,2],[0,0],[3,2],[0,1],[2,0],[0,3],[2,1],[0,3],[3,2]]
Output:  0.6+4-0/2/4=0.575

SOGL V0.12 , 70 69 67 bajtów

i⅛⁸Νο;⌡░▼Y6γj±²‘1n4n.⌡Iø,→{_≤whwιh:"/*-+”;W? )Κ; (Κ;}+}:Ƨ)(čøŗoļ=→p

Wypróbuj tutaj lub wypróbuj wersję, która pobiera dane wejściowe podane w testowych przypadkach

używa Ioperatora SOGL , który obraca tablicę. Następnie odczytuje ciąg znaków jako tablicę JavaScript, a tam, gdzie używana jest operacja, umieszcza poprzednie wyniki w nawiasach, ocenia jako JavaScript, a następnie usuwa nawiasy.

Dyalog APL, 94 88 86 85 bajtów

{o,'=',⍎('('\⍨+/'+-×÷'∊⍨o),'[×÷+-]'⎕R')&'⊢o←(((⌽∘⍉⍣⍺)4 4⍴'789÷456×123-00.+')⊃⍨⊂∘⊢)¨⍵}

Wypróbuj online!

Traktuje obroty jako lewy argument, 0-3a wskaźniki oparte na 1 jako prawy argument, jako listę y xwspółrzędnych (1 1)(2 3)(4 5)itp.

Stało się to dość nieładne z powodu praworęcznej oceny wyrażeń w APL.

C (gcc) , 282294 295 296 300 304 306 310 bajty

Wszystkie optymalizacje muszą być wyłączone i działają tylko w 32-bitowym GCC.

float r,s;k,p,l,i;g(d,x,y){int w[]={y,x,3-y,3-x,y};d=w[d+1]*4+w[d];}f(x,y,z)int**z;{for(i=0;i<=y;i++)putchar(k=i-y?"789/456*123-00.+"[g(x,z[i][0],z[i][1])]:61),57/k*k/48?p?r+=(k-48)*pow(10,p--):(r=10*r+k-48):k-46?s=l?l%2?l%5?l&4?s/r:s+r:s-r:s*r:r,r=p=0,l=k:(p=-1);printf("%.3f",s);}

1 bajt dzięki @Orion!

Wypróbuj online!

Prototyp funkcji:

f(<Direction 0-3>, <Number of entries>, <a int** typed array in [N][2]>)

Format wejściowy (jak w TIO):

<Direction 0~3> <Number of entries>
<Entries 0 Row> <Entries 0 Column>
<Entries 1 Row> <Entries 1 Column>
....
<Entries N Row> <Entries N Column>

Wersja bez golfa z komentarzami:

float r, s;
k, p, l, i;
g(d, x, y) {
  int w[] = {
    y,
    x,
    3 - y,
    3 - x,
    y
  };
  d = w[d + 1] * 4 + w[d];
}
f(x, y, z) int **z; {
  for (i = 0; i <= y; i++)
  {
      putchar(k = i - y ? 
      "789/456*123-00.+"[g(x, z[i][0], z[i][1])] : 61),     // Print character, otherwise, '='
      57 / k * k / 48 ?                                     // If the character is from '0'~'9'
        p ?                                                 // If it is after or before a dot
            r += (k - 48) * pow(10., p--)                   // +k*10^-p
        :
            (r = 10 * r + k - 48)                           // *10+k
      :
          k - 46 ?                                          // If the character is not '.', that is, an operator, + - * / =
            s = l ?                                         // Calculate the result of previous step (if exist)
                    l % 2 ?                                 // If + - /
                        l % 5 ?                             // If + /
                            l & 4 ?
                                s / r
                            :
                                s + r
                        :
                            s - r
                    :
                        s * r
                 :
                    r,
                    r = p = 0, l = k                        // Reset all bits
          :
            (p = -1);                                       // Reverse the dot bit
  }
  printf("%.3f", s);
}

Kod może obsługiwać przypadki takie jak 1+.7lub -8*4.

Bardzo smutne, że C nie ma eval😭.

JavaScript (ES6), 162 160 157 bajtów

Pobiera dane wejściowe jako orientację oi tablicę współrzędnych (y, x)a w składni curry (o)(a).

Orientacja jest liczbą całkowitą w [0..3] :

• 0 = 0 °
• 1 = 90 ° zgodnie z ruchem wskazówek zegara
• 2 = 180 ° zgodnie z ruchem wskazówek zegara
• 3 = 270 ° zgodnie z ruchem wskazówek zegara

o=>a=>(s=a.map(([y,x])=>'789/456*123-00.+'[[p=y*4+x,12+(y-=x*4),15-p,3-y][o]]).join``)+'='+eval([...x=`0)+${s}`.split(/(.[\d.]+)/)].fill`(`.join``+x.join`)`)

Przypadki testowe

let f =

o=>a=>(s=a.map(([y,x])=>'789/456*123-00.+'[[p=y*4+x,12+(y-=x*4),15-p,3-y][o]]).join``)+'='+eval([...x=`0)+${s}`.split(/(.[\d.]+)/)].fill`(`.join``+x.join`)`)

console.log(f(3)([[2,1],[3,2],[3,0],[0,1],[1,1]])) // 517*6=3102
console.log(f(1)([[1,3],[0,0],[1,0],[3,3],[0,2],[3,0],[0,0],[2,0],[0,3],[1,2]])) // 800/4+0.75=200.75
console.log(f(0)([[0,0],[0,1],[0,2],[0,3],[2,1],[1,2],[2,2]])) // 789/263=3
console.log(f(2)([[0,3],[0,1],[2,1],[0,0],[2,3],[1,0],[0,2],[3,0],[1,2],[3,0],[2,3]])) // 0.6+4-0/2/4=0.575

Rubin , 135 133 132 bajtów

->r,c{a="";c.map{|x,y|a=((w="789/456*123-00.+"[[y*4+x,12-x*4+y,15-y*4-x,x*4+3-y][r]])=~/[0-9.]/?a:"#{eval a}")+w;w}*""+"=#{eval a}"}

Wypróbuj online!

Orientacja jako liczba całkowita: 0 dla 0 °, 1 dla 90 ° i tak dalej.

Python 3, 235 234 230 bajtów

Trochę brzydkie, ale działa we wszystkich przypadkach testowych, z wyjątkiem pierwszego, który wydaje się nie pasować do przykładowego kalkulatora. Obracam jako 0-3 (0-270) i ​​mnożę przez 16, aby przesunąć.

eval() jest wbudowanym programem, który próbuje skompilować ciągi znaków jako kod i obsługuje konwersję symboli tekstowych na operatory.

import re
def f(r,c,J=''.join):
 b='789/456*123-00.+01470258.369+-*/+.00-321*654/987/*-+963.85207410'
 s=t=J([b[r*16+x*4+y]for y,x in c]);t=re.split('([\+\-\/\*])',s)
 while len(t)>2:t=[str(eval(J(t[0:3])))]+t[3:]
 print(s+'='+t[0])

Metoda alternatywna okazała się nieco dłuższa, ale naprawdę podoba mi się ta końcówka SO do obracania tablicy.

import re
def f(r,c):
 L=list;b=L(map(L,['789/','456*','123-','00.+']))
 while r:b=L(zip(*b[::-1]));r-=1
 s=''.join([b[x][y]for y,x in c]);t=re.split('([\+\-\/\*])',s)
 while len(t)>2:t=[str(eval(''.join(t[0:3])))]+t[3:]
 print(s+'='+t[0])

Java 10, 418 380 378 bajtów

d->a->{String r="",g=d>2?"/*-+963.85207410":d>1?"+.00-321*654/987":d>0?"01470258.369+-*/":"789/456*123-00.+",n[],o[];for(var i:a)r+=g.charAt(i[1]*4+i[0]);n=r.split("[-/\\+\\*]");o=r.split("[[0-9]\\.]");float s=new Float(n[0]),t;for(int i=1,O,j=0;++j<o.length;O=o[j].isEmpty()?99:o[j].charAt(0),s=O<43?s*t:O<44?s+t:O<46?s-t:O<48?s/t:s,i+=1-O/99)t=new Float(n[i]);return r+"="+s;}

Postanowiłem także odpowiedzieć na moje pytanie. Jestem pewien, że można go jeszcze pograć w golfa, stosując inne podejście.
Wprowadź jako int( 0-3) i int[][](indeksowane 0 / to samo co w opisie wyzwania). Wyprowadza jak floatz wiodącym, .0jeśli wynikiem jest liczba całkowita zamiast liczby dziesiętnej.

-2 bajty dzięki @ceilingcat .

Wyjaśnienie:

Wypróbuj tutaj.

d->a->{                       // Method with int & 2D int-array parameters and String return
  String r="",                //  Result-String, starting empty
    g=d>2?                    //  If the input is 3:
       "/*-+963.85207410"     //   Use 270 degree rotated String
      :d>1?                   //  Else if it's 2:
       "+.00-321*654/987"     //   Use 180 degree rotated String
      :d>0?                   //  Else if it's 1:
       "01470258.369+-*/"     //   Use 90 degree rotated String
      :                       //  Else (it's 0):
       "789/456*123-00.+",    //   Use default String
    n[],o[];                  //  Two temp String-arrays
  for(var i:a)                //  Loop over the coordinates:
    r+=g.charAt(i[1]*4+i[0]); //   Append the result-String with the next char
  n=r.split("[-/\\+\\*]");    //  String-array of all numbers
  o=r.split("[[0-9]\\.]");    //  String-array of all operands (including empty values unfortunately)
  float s=new Float(n[0]),    //  Start the sum at the first number
        t;                    //  A temp decimal
  for(int i=0,                //  Index-integer `i`, starting at 0
      O,                      //  A temp integer
      j=0;++j<o.length        //  Loop `j` over the operands
      ;                       //    After every iteration:
       O=o[j].isEmpty()?      //     If the current operand is an empty String
          99                  //      Set `O` to 99
         :                    //     Else:
          o[j].charAt(0),     //      Set it to the current operand character
       s=O<43?                //     If the operand is '*':
          s*t                 //      Multiply the sum with the next number
         :O<44?               //     Else-if the operand is '+':
          s+t                 //      Add the next number to the sum
         :O<46?               //     Else-if the operand is '-':
          s-t                 //      Subtract the next number from the sum 
         :O<48?               //     Else-if the operand is '/':
          s/t                 //      Divide the sum by the next number
         :                    //     Else (the operand is empty):
          s,                  //      Leave the sum the same
       i+=1-O/99)             //     Increase `i` if we've encountered a non-empty operand
    t=new Float(n[i]);        //   Set `t`  to the next number in line
  return r+"="+s;}            //  Return the sum + sum-result

PHP ,267 235 229 225 221 213 bajtów

<?php $t=[1,12,15,4,1];$j=$t[$k=$argv[1]];($o=$i=$t[$k+1])<5&&$o--;foreach(json_decode($argv[2])as$c){echo$s='/*-+963.85207410'[($c[0]*$i+$c[1]*$j+$o)%16];strpos(' /*-+',$s)&&$e="($e)";$e.=$s;}eval("echo'=',$e;");

Wypróbuj online!

6 bajtów dzięki @Kevin Cruijssen.

Kierunki wprowadzania to: 0 to 0, 1 to 90, 2 to 180, a 3 to 270 stopni.

Nie golfił

Obrót jest trudny, moim pomysłem jest ponowne mapowanie symboli w zależności od orientacji. Ponowne mapowanie odbywa się poprzez pomnożenie współrzędnych xiy przez różne kwoty i przesunięcie wyniku. Istnieje więc potrójne na orientację (zapisane w $ rot). Jest prawdopodobnie lepszy sposób, ale w tej chwili nie mogę o tym myśleć!

$coords = json_decode($argv[2]);
$symbols = '789/456*123-00.+';
$r=$argv[1];
$rot = [1,4,0,12,1,12,15,12,15,4,15,3];    
list($xs,$ys,$o)=array_slice($rot,$r*3,3);

$expression='';

foreach($coords as $coord) {
    $symbol=$symbols[($coord[0]*$xs+$coord[1]*$ys+$o)%16];

    if (!is_numeric($symbol) && $symbol!='.') {
        $expression = "($expression)";
    }
    $expression .=$symbol;
    echo $symbol;
}

eval ("echo '='.($expression);");

?>

05AB1E , 57 54 bajtów

εžm3ôí…/*-ø"00.+"ª€SIFøí}yθèyнè}JD'=s.γžh'.«så}R2ôR».VJ

Używa współrzędnych 0, podobnych do opisu wyzwania i [0,1,2,3]dla[0,90,180,270] odpowiednio jako wejścia.

Wypróbuj online lub sprawdź wszystkie przypadki testowe .

Wyjaśnienie:

ε                    # Map over each of the (implicit) input-coordinates:
 žm                  #  Push builtin "9876543210"
   3ô                #  Split it into parts of size 3: [987,654,321,0]
     í               #  Reverse each inner item: [789,456,123,0]
      …/*-           #  Push string "/*-"
          ø          #  Zip the lists together: [["789","/"],["456","*"],["123","-"]]
           "00.+"ª   #  Append string "00.+": [["789","/"],["456","*"],["123","-"],"00.+"]
                  €S #  Convert each inner item to a flattened list of characters
                     #   [[7,8,9,"/"],[4,5,6,"*"],[1,2,3,"-"],[0,0,".","+"]]
 IF                  #  Loop the input-integer amount of times:
   ø                 #   Zip/transpose the character-matrix; swapping rows/columns
    í                #   And then reverse each inner row
 }                   #  Close the loop (we now have our rotated character matrix)
  yθèyнè             #  Index the current coordinate into this matrix to get the character
}J                   # After the map: join all characters together to a single string
  D                  # Duplicate the string
   '=               '# Push string "="
     s               # Swap to get the duplicated string again
      .γ             # Group it by (without changing the order):
        žh           #  Push builtin "0123456789"
          1/         #  Divide it by 1, so it'll become a float with ".0": "0123456789.0"
                     #  (1 byte shorter than simply appending a "." with `'.«`)
            så       #  And check if this string contains the current character
       }             # Close the group-by, which has separating the operators and numbers
                     #  i.e. "800/4+0.75" → ["800","/","4","+","0.75"]
        R            # Reverse this list
                     #  i.e. ["0.75","+","4","/","800"]
         2ô          # Split it into parts of size 2
                     #  i.e. [["0.75","+"],["4","/"],["800"]]
           R         # Reverse the list again
                     #  i.e. [["800"],["4","/"],["0.75","+"]]
            »        # Join each inner list by spaces, and then those strings by newlines
                     #  i.e. "800\n4 /\n0.75 +"
             .V      # Execute this string as 05AB1E code
               J     # Join this with the earlier string and "=" on the stack
                     # (after which the result is output implicitly)

Burleska , 122 bajty

pe'1'9r@3co{".-"".*""./"}z[)FL{'0'0'.".+"}+]j{{}{tp}{)<-<-}{tp)<-}}j!!e!<-Ppra{pPj<-d!}msJ'=_+j{><}gB3co{rtp^}mwpe?+'.;;++

Wypróbuj online!

Przyjmuje argumenty jako: "[[1,2],[2,3],[0,3],[1,0],[1,1]]" 3

pe                  # Push args to stack
'1'9r@              # Range of characters [1,9]
3co                 # Split into chunks of 3
{".-" ".*" "./"}z[  # Zip in the operators
)FL                 # Flatten the resulting list (giving us the first 3 rows)
{'0 '0 '. ".+"}+]   # Add the 4th row
j                   # Swap rotation index to top of stack
{
 {}                 # NOP
 {tp}               # Transpose
 {)<- <-}           # Reverse each column and row
 {tp )<-}           # Transpose and reverse each row
}
j!!e!               # Select which based on rotation spec and eval
<-                  # Reverse the result
Pp                  # Push to hidden stack
ra                  # Read the coords as array
{
 pP                 # Pop from hidden stack
 j<-                # Reverse the coords (tp'd out)
 d!                 # Select this element
}ms                 # For each coord and accumulate result as string
J                   # Duplicate said string
'=_+j               # Put the equals at the end of the other string
{><}gB              # Group by whether digits
3co                 # Split into chunks of 3
{
 rt                 # rotate (putting op in post-fix position)
 p^                 # Ungroup
}mw                 # Map intercalating spaces
pe                  # Evaluate the result
?+                  # Combine the results
'.;;++              # Change .* ./ etc to * /