旋转计算器


16

介绍:

让我们看一下Windows中的标准计算器: 对于这一挑战,我们将仅查看以下按钮,而忽略其他所有内容:
在此处输入图片说明

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

挑战:

输入:
您将收到两个输入:

  • 一种是表示以90度为增量的旋转
  • 另一个是代表旋转计算器上按下的按钮的坐标列表。

基于第一个输入,我们将上述布局以90度为增量顺时针旋转。因此,如果输入为0 degrees,则保持原样;但是如果输入为270 degrees,则它将顺时针旋转3次(或逆时针旋转1次)。这是四个可能的布局:

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

第二个输入是任何合理格式的坐标列表。例如(0索引的2D整数数组):

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

输出:
我们既输出总和,又输出结果(和等号=)。

示例:
因此,如果输入为270 degrees[[1,2],[2,3],[0,3],[1,0],[1,1]],则输出将变为:

517*6=3102

挑战规则:

  • 输入可以采用任何合理的格式。第一输入可以是0-31-4A-D0,90,180,270,等。第二输入可以是0索引2D阵列,1-索引2D阵列,串,点对象的列表等你的电话。与给定的示例输入相比,甚至可以交换x和y坐标。请说明您在答案中使用的输入格式!
  • 517 * 6 = 3102如果需要,您可以添加空格(即)。
  • 您可以在逗号后添加尾随零,最多为三个(即3102.0/ 3102.00/ 3102.000代替31020.430代替0.43)。
  • 不允许在输出中添加括号,因此(((0.6+4)-0)/2)/4=0.575不是有效的输出。
  • 允许您为您的语言使用其他操作数符号。因此,×·代替*; 或÷代替/; 等等
  • 由于计算器在输入操作数时会自动进行计算,因此您应该忽略运算符的优先级!所以10+5*3会导致45(10+5)*3=45),没有2510+(5*3)=25
    (即10→交通+→交通5→交通*(现在显示器15的显示)→交通3→交通=(它现在显示的答案45))。eval在对结果求和使用和类似函数时,请记住这一点。
  • 除以0的测试用例不会出现。
  • 不会有超过三位小数位数的测试用例,因此不需要四舍五入结果。
  • 不会有多个操作数彼此跟随或两个点彼此跟随的测试用例。
  • 负数不会有任何测试用例。减号(-)仅用作操作数,而不用作负数。
  • .##逗号前不会有任何没有前导号的测试用例(即2+.7不是有效的测试用例,但2+0.7可能是)。

通用规则:

  • 这是,因此最短答案以字节为单位。
    不要让代码高尔夫球语言阻止您使用非代码高尔夫球语言发布答案。尝试针对“任何”编程语言提出尽可能简短的答案。
  • 标准规则适用于您的答案,因此允许您使用STDIN / STDOUT,具有适当参数的函数/方法,完整程序。你的来电。
  • 默认漏洞是禁止的。
  • 如果可能的话,请添加一个带有测试代码的链接。
  • 另外,如有必要,请添加说明。

测试用例:

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

1
测试用例有很多错误(例如,第3个和第4个交换了X和Y(第1个没有),我甚至都不知道第2个发生了什么)
dzaima

2
程序应该处理奇怪的按钮按下吗?1+-*/+-*/20.5在Windows(10)计算器上给出。
user202729

1
第二个测试用例应以[1,3],
Uriel

1
我们是否必须处理小于1的小数而不带前导0,例如in 2+.7
Tutleman

4
运算符优先级是为什么我从不在标准模式下使用Windows计算器。
尼尔

Answers:



3

Dyalog APL,94 88 86 85字节

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

在线尝试!

将旋转数作为左参数,0-3并将基于1的索引作为右参数,以及y x诸如此类的坐标列表(1 1)(2 3)(4 5)

由于对APL中的表达式进行了正确的求值,因此变得非常混乱。


3

C(gcc),282294 295 296 300 304 306310 个字节

所有优化都需要关闭,并且仅适用于32位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字节感谢@Orion!

在线尝试!

功能原型:

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

输入格式(与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>

带注释的非高尔夫版本:

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

该代码可以处理诸如1+.7或的情况-8*4

非常可悲的C没有eval😭。


您确实可以认为3*-5无效的案件。我已经在规则中指定了这一点。
凯文·克鲁伊森

考虑到在规则所要求的精度只有3个名额,你可以取代doublefloat一个免费字节。另外,还不putc()一样putchar()吗?我可能是错的。
Orion

我记得@Orion putc需要第二个参数来指定要写入的流?
Keyu Gan


2

的JavaScript(ES6),162个 160 157字节

以currying语法将输入作为(y,x)坐标的方向o和数组。a(o)(a)

方向是[0..3]中的整数:

  • 0 = 0°
  • 1 =顺时针90°
  • 2 =顺时针180°
  • 3 =顺时针270°
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`)`)

测试用例


2

红宝石135个133 132字节

->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}"}

在线尝试!

整数方向:0表示0°,1表示90°,依此类推。


1

Python 3中,235个 234 230字节

有点难看,但它适用于除第一个测试用例以外的所有测试用例,后者似乎与示例计算器不匹配。我将旋转数设为0-3(0-270),然后乘以16以抵消。

eval() 是一个内置程序,它尝试将字符串编译为代码并处理将文本符号转换为运算符的过程。

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

另一种方法,结果更长了一点,但是我真的很喜欢这个旋转阵列的技巧

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

1

Java的10,418个 380 378字节

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;}

决定也回答我自己的问题。我敢肯定,可以使用其他方法进一步打高尔夫。
输入为int0-3)和int[][](0索引/与挑战说明中相同)。如果结果是整数而不是十进制数,则float与前导一样输出.0

-2个字节感谢@ceilingcat

说明:

在这里尝试。

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

1

PHP267 235 229 225 221 213字节

<?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;");

在线尝试!

感谢@Kevin Cruijssen提供6个字节。

输入方向为:0为0、1为90、2为180和3为270度。

不打高尔夫球

旋转很棘手,我的想法是根据方向重新映射符号。通过将x和y坐标乘以不同的数量并偏移结果来完成重新映射。因此,每个方向有一个三元组(存储在$ rot中)。也许有更好的方法,但是我暂时无法想到!

$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);");

?>

我不是太熟悉PHP,但我认为你可以高尔夫&&&拯救一个字节。很好的答案,我+1!:)
Kevin Cruijssen

实际上,我认为if(!is_numeric($s)&$s!='.')可以进一步研究if(strpos(' /*-+',$s))(如果我正确理解了这个答案)。
Kevin Cruijssen

当然!谢谢你 我在那里盯着那个if语句,但是什么也没来。
Guillermo Phillips

0

05AB1E57 54 字节

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

使用0系作为挑战描述类似的坐标,和[0,1,2,3]用于[0,90,180,270]分别作为输入。

在线尝试验证所有测试用例

说明:

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

0

滑稽,122字节

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

在线尝试!

将args作为: "[[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 * /
By using our site, you acknowledge that you have read and understand our Cookie Policy and Privacy Policy.
Licensed under cc by-sa 3.0 with attribution required.