Equal, sum or difference!












27












$begingroup$


Write shortest possible code that will return true if the two given integer values are equal or their sum or absolute difference is 5.



Example test cases:



4 1 => True
10 10 => True
1 3 => False
6 2 => False
1 6 => True
-256 -251 => True
6 1 => True
-5 5 => False


The shortest I could come up with in python2 is 56 characters long:



x=input();y=input();print all([x-y,x+y-5,abs(x-y)-5])<1


-9, thanks @ElPedro. It takes input in format x,y:



x,y=input();print all([x-y,x+y-5,abs(x-y)-5])<1









share|improve this question









New contributor




Vikrant Biswas is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.







$endgroup$








  • 8




    $begingroup$
    welcome to PPCG! This is a good first challenge -- the challenge is clearly defined, it has ample test cases, and uses our default I/O! If you stick around for a while and keep thinking up interesting challenges, I would recommend using The Sandbox to get feedback before posting them to this site. I hope you enjoy the time you spend here!
    $endgroup$
    – Giuseppe
    2 days ago
















27












$begingroup$


Write shortest possible code that will return true if the two given integer values are equal or their sum or absolute difference is 5.



Example test cases:



4 1 => True
10 10 => True
1 3 => False
6 2 => False
1 6 => True
-256 -251 => True
6 1 => True
-5 5 => False


The shortest I could come up with in python2 is 56 characters long:



x=input();y=input();print all([x-y,x+y-5,abs(x-y)-5])<1


-9, thanks @ElPedro. It takes input in format x,y:



x,y=input();print all([x-y,x+y-5,abs(x-y)-5])<1









share|improve this question









New contributor




Vikrant Biswas is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.







$endgroup$








  • 8




    $begingroup$
    welcome to PPCG! This is a good first challenge -- the challenge is clearly defined, it has ample test cases, and uses our default I/O! If you stick around for a while and keep thinking up interesting challenges, I would recommend using The Sandbox to get feedback before posting them to this site. I hope you enjoy the time you spend here!
    $endgroup$
    – Giuseppe
    2 days ago














27












27








27


2



$begingroup$


Write shortest possible code that will return true if the two given integer values are equal or their sum or absolute difference is 5.



Example test cases:



4 1 => True
10 10 => True
1 3 => False
6 2 => False
1 6 => True
-256 -251 => True
6 1 => True
-5 5 => False


The shortest I could come up with in python2 is 56 characters long:



x=input();y=input();print all([x-y,x+y-5,abs(x-y)-5])<1


-9, thanks @ElPedro. It takes input in format x,y:



x,y=input();print all([x-y,x+y-5,abs(x-y)-5])<1









share|improve this question









New contributor




Vikrant Biswas is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.







$endgroup$




Write shortest possible code that will return true if the two given integer values are equal or their sum or absolute difference is 5.



Example test cases:



4 1 => True
10 10 => True
1 3 => False
6 2 => False
1 6 => True
-256 -251 => True
6 1 => True
-5 5 => False


The shortest I could come up with in python2 is 56 characters long:



x=input();y=input();print all([x-y,x+y-5,abs(x-y)-5])<1


-9, thanks @ElPedro. It takes input in format x,y:



x,y=input();print all([x-y,x+y-5,abs(x-y)-5])<1






code-golf decision-problem






share|improve this question









New contributor




Vikrant Biswas is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.











share|improve this question









New contributor




Vikrant Biswas is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.









share|improve this question




share|improve this question








edited yesterday







Vikrant Biswas













New contributor




Vikrant Biswas is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.









asked 2 days ago









Vikrant BiswasVikrant Biswas

13916




13916




New contributor




Vikrant Biswas is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.





New contributor





Vikrant Biswas is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.






Vikrant Biswas is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.








  • 8




    $begingroup$
    welcome to PPCG! This is a good first challenge -- the challenge is clearly defined, it has ample test cases, and uses our default I/O! If you stick around for a while and keep thinking up interesting challenges, I would recommend using The Sandbox to get feedback before posting them to this site. I hope you enjoy the time you spend here!
    $endgroup$
    – Giuseppe
    2 days ago














  • 8




    $begingroup$
    welcome to PPCG! This is a good first challenge -- the challenge is clearly defined, it has ample test cases, and uses our default I/O! If you stick around for a while and keep thinking up interesting challenges, I would recommend using The Sandbox to get feedback before posting them to this site. I hope you enjoy the time you spend here!
    $endgroup$
    – Giuseppe
    2 days ago








8




8




$begingroup$
welcome to PPCG! This is a good first challenge -- the challenge is clearly defined, it has ample test cases, and uses our default I/O! If you stick around for a while and keep thinking up interesting challenges, I would recommend using The Sandbox to get feedback before posting them to this site. I hope you enjoy the time you spend here!
$endgroup$
– Giuseppe
2 days ago




$begingroup$
welcome to PPCG! This is a good first challenge -- the challenge is clearly defined, it has ample test cases, and uses our default I/O! If you stick around for a while and keep thinking up interesting challenges, I would recommend using The Sandbox to get feedback before posting them to this site. I hope you enjoy the time you spend here!
$endgroup$
– Giuseppe
2 days ago










30 Answers
30






active

oldest

votes


















20












$begingroup$


Python 2, 30 bytes





lambda a,b:a in(b,5-b,b-5,b+5)


Try it online!



One byte saved by Arnauld



Three bytes saved by alephalpha






share|improve this answer











$endgroup$













  • $begingroup$
    This is amazingly concise, thanks
    $endgroup$
    – Vikrant Biswas
    2 days ago










  • $begingroup$
    Same can be done in Octave/MATLAB in 29 bytes (Try it online!).
    $endgroup$
    – Tom Carpenter
    yesterday



















15












$begingroup$

JavaScript (ES6), 28 bytes



Takes input as (a)(b). Returns $0$ or $1$.





a=>b=>a+b==5|!(a-=b)|a*a==25


Try it online!






share|improve this answer











$endgroup$









  • 1




    $begingroup$
    Damn, took me a long long time to figure out how this handling the difference part. :)
    $endgroup$
    – Vikrant Biswas
    2 days ago



















8












$begingroup$


Dyalog APL, 9 bytes





=∨5∊+,∘|-


Try it online!



Spelled out:



  =   ∨  5      ∊                +   , ∘    |            -
equal or 5 found in an array of sum and absolute of difference.





share|improve this answer











$endgroup$





















    6












    $begingroup$

    x86 machine code, 39 bytes



    00000000: 6a01 5e6a 055f 5251 31c0 39d1 0f44 c601  j.^j._RQ1.9..D..
    00000010: d139 cf0f 44c6 595a 29d1 83f9 050f 44c6 .9..D.YZ).....D.
    00000020: 83f9 fb0f 44c6 c3 ....D..


    Assembly





    section .text
    global func
    func: ;inputs int32_t ecx and edx
    push 0x1
    pop esi
    push 0x5
    pop edi
    push edx
    push ecx
    xor eax, eax

    ;ecx==edx?
    cmp ecx, edx
    cmove eax, esi

    ;ecx+edx==5?
    add ecx, edx
    cmp edi, ecx
    cmove eax, esi

    ;ecx-edx==5?
    pop ecx
    pop edx
    sub ecx, edx
    cmp ecx, 5

    ;ecx-edx==-5?
    cmove eax, esi
    cmp ecx, -5
    cmove eax, esi

    ret


    Try it online!






    share|improve this answer









    $endgroup$





















      5












      $begingroup$


      R, 40 bytes (or 34)





      function(x,y)any((-1:1*5)%in%c(x+y,x-y))


      Try it online!



      For non-R users:





      • -1:1*5 expands to [-5, 0, 5]

      • the %in% operator takes elements from the left and checks (element-wise) if they exist in the vector on the right


      A direct port of @ArBo's solution has 35 34 bytes, so go upvote that answer if you like it:



      function(x,y)x%in%c(y--1:1*5,5-y)





      share|improve this answer











      $endgroup$













      • $begingroup$
        The 34 byte one can be reduced by 1 with function(x,y)x%in%c(y--1:1*5,5-y)
        $endgroup$
        – MickyT
        2 days ago










      • $begingroup$
        Can drop to 30 bytes by moving the subtraction: function(x,y)(x-y)%in%(-1:1*5), and drop it further to 24 bytes by dropping the function notation to scan() input: diff(scan())%in%(-1:1*5) Try it online!. Still very much the same method though.
        $endgroup$
        – CriminallyVulgar
        yesterday








      • 1




        $begingroup$
        @CriminallyVulgar does that account for the sum being 5?
        $endgroup$
        – ArBo
        yesterday










      • $begingroup$
        @ArBo Hah, missed that in the spec, and there wasn't a test case in the TIO so I just glossed over it!
        $endgroup$
        – CriminallyVulgar
        21 hours ago










      • $begingroup$
        Minor change that can be made to both is to use pryr::f, which happens to work in both cases. Whether it can properly detect the arguments is entirely somewhat hit or miss but it seems to nail these two functions. e.g. pryr::f(x%in%c(y--1:1*5,5-y)) Try it online!. Gets you to 36 and 29 bytes respectively.
        $endgroup$
        – CriminallyVulgar
        14 hours ago



















      4












      $begingroup$


      Jelly, 7 bytes



      +,ạ5eo=


      Try it online!



      How it works



      +,ạ5eo=  Main link. Arguments: x, y (integers)

      + Yield x+y.
      ạ Yield |x-y|.
      , Pair; yield (x+y, |x-y|).
      5e Test fi 5 exists in the pair.
      = Test x and y for equality.
      o Logical OR.





      share|improve this answer









      $endgroup$





















        4












        $begingroup$


        J, 12 11 bytes



        1 byte saved thanks to Adám



        1#.=+5=|@-,+


        Try it online!



        Explanation



        This is equivalent to:



        1 #. = + 5 = |@- , +


        This can be divided into the following fork chain:



        (= + (5 e. (|@- , +)))


        Or, visualized using 5!:4<'f':



          ┌─ =               
        ├─ +
        ──┤ ┌─ 5
        │ ├─ e.
        └───┤ ┌─ |
        │ ┌─ @ ─┴─ -
        └────┼─ ,
        └─ +


        Annotated:



          ┌─ =                                     equality
        ├─ + added to (boolean or)
        ──┤ ┌─ 5 noun 5
        │ ├─ e. is an element of
        └───┤ ┌─ | absolute value |
        │ ┌─ @ ─┴─ - (of) subtraction |
        └────┼─ , paired with |
        └─ + addition | any of these?





        share|improve this answer











        $endgroup$













        • $begingroup$
          Save a byte with e.
          $endgroup$
          – Adám
          2 days ago










        • $begingroup$
          @Adám How so? Shortest approach I got with e. was =+.5 e.|@-,+. Maybe you forget 5e. is an invalid token in J?
          $endgroup$
          – Conor O'Brien
          2 days ago










        • $begingroup$
          Since two integers cannot simultaneously sum to 5 and be equal, you can use + instead of +.
          $endgroup$
          – Adám
          2 days ago










        • $begingroup$
          @Adám Ah, I see, thank you.
          $endgroup$
          – Conor O'Brien
          2 days ago



















        4












        $begingroup$

        Python 2, 38 bytes



        -2 bytes thanks to @DjMcMayhem





        lambda a,b:a+b==5or abs(a-b)==5or a==b


        Try it online!






        share|improve this answer











        $endgroup$













        • $begingroup$
          Your TIO is actually 42 bytes but you can fix it by deleting the spaces between the 5s and the ors
          $endgroup$
          – ElPedro
          2 days ago








        • 3




          $begingroup$
          Actually, the TIO link could be 38 bytes
          $endgroup$
          – DJMcMayhem
          2 days ago










        • $begingroup$
          @ElPedro the function itself was 40 bytes but I used f= in order to be able to call it
          $endgroup$
          – fəˈnɛtɪk
          2 days ago






        • 1




          $begingroup$
          @DJMcMayhem I don't normally golf in python. I just did it because the question asker used python for their example
          $endgroup$
          – fəˈnɛtɪk
          2 days ago



















        4












        $begingroup$


        Java (JDK), 30 bytes





        a->b->a+b==5|a==b|(b-=a)*b==25


        Try it online!






        share|improve this answer









        $endgroup$





















          4












          $begingroup$


          Wolfram Language (Mathematica), 22 bytes



          Takes input as [a][b].



          MatchQ[#|5-#|#-5|#+5]&


          Try it online!






          share|improve this answer











          $endgroup$





















            4












            $begingroup$


            Python 2, 29 31 bytes





            lambda a,b:a+b==5or`a-b`in"0-5"


            Try it online!



            Since I didn't manage to read the task carefully the first time, in order to fix it, I had to come up with a completely different approach, which is unfortunately not as concise.






            share|improve this answer











            $endgroup$





















              4












              $begingroup$


              PowerShell, 48 44 40 bytes





              param($a,$b)$b-in($a-5),(5-$a),(5+$a),$a


              Try it online! or Verify all Test Cases



              Takes input $a and $b. Checks if $b is -in the group ($a-5, 5-$a 5+$a, or $a), which checks all possible combinations of $a,$b, and 5.



              -4 bytes thanks to mazzy.
              -4 bytes thanks to KGlasier.






              share|improve this answer











              $endgroup$













              • $begingroup$
                ($a-$b) is -$x :)
                $endgroup$
                – mazzy
                2 days ago










              • $begingroup$
                @mazzy Ooo, good call.
                $endgroup$
                – AdmBorkBork
                2 days ago










              • $begingroup$
                If you switch 5 and $b around you can cut off a couple bytes(ie param($a,$b)$b-in($a-5),(5-$a),($a+5),$a) Try it out here
                $endgroup$
                – KGlasier
                yesterday






              • 1




                $begingroup$
                @KGlasier Excellent suggestion. I needed to swap $a+5 to 5+$a to get it to cast appropriately when taking command-line input, but otherwise awesome. Thanks!
                $endgroup$
                – AdmBorkBork
                yesterday



















              4












              $begingroup$

              8086 machine code, 22 20 bytes



              8bd0 2bc3 740e 7902 f7d8 3d0500 7405 03d3 83fa05


              Ungolfed:



              ESD  MACRO
              LOCAL SUB_POS, DONE
              MOV DX, AX ; Save AX to DX
              SUB AX, BX ; AX = AX - BX
              JZ DONE ; if 0, then they are equal, ZF=1
              JNS SUB_POS ; if positive, go to SUB_POS
              NEG AX ; otherwise negate the result
              SUB_POS:
              CMP AX, 5 ; if result is 5, ZF=1
              JZ DONE
              ADD DX, BX ; DX = DX + BX
              CMP DX, 5 ; if 5, ZF=1
              DONE:
              ENDM


              Input numbers in AX and BX and returns Zero Flag (ZF=1) if result is true. If desired, you can also determine which condition was true with the following:




              • ZF = 1 and DX = 5 ; sum is 5

              • ZF = 1 and AX = 5 ; diff is 5

              • ZF = 1 and AX = 0 ; equal

              • ZF = 0 ; result false


              If the difference between the numbers is 0, we know they are equal. Otherwise if result is negative, then first negate it and then check for 5. If still not true, then add and check for 5.



              Sample PC DOS test program. Download it here (ESD.COM).



              START:
              CALL INDEC ; input first number into AX
              MOV BX, AX ; move to BX
              CALL INDEC ; input second number into BX
              ESD ; run "Equal, sum or difference" routine
              JZ TRUE ; if ZF=1, result is true
              FALSE:
              MOV DX, OFFSET FALSY ; load Falsy string
              JMP DONE
              TRUE:
              MOV DX, OFFSET TRUTHY ; load Truthy string
              DONE:
              MOV AH, 9 ; DOS display string
              INT 21H ; execute
              MOV AX, 4C00H ; DOS terminate
              INT 21H ; execute

              TRUTHY DB 'Truthy$'
              FALSY DB 'Falsy$'

              INCLUDE INDEC.ASM ; generic decimal input prompt routine


              Output of test program:



              A>ESD.COM
              : 4
              : 1
              Truthy

              A>ESD.COM
              : 10
              : 10
              Truthy

              A>ESD.COM
              : 1
              : 3
              Falsy

              A>ESD.COM
              : 6
              : 2
              Falsy

              A>ESD.COM
              : 1
              : 6
              Truthy

              A>ESD.COM
              : -256
              : -251
              Truthy

              A>ESD.COM
              : 6
              : 1
              Truthy

              A>ESD.COM
              : 9999999999
              : 9999999994
              Truthy





              share|improve this answer











              $endgroup$





















                3












                $begingroup$


                C# (.NET Core), 43, 48, 47, 33 bytes



                EDIT: Tried to use % and apparently forgot how to %. Thanks to Arnauld for pointing that out!



                EDIT2: AdmBorkBork with a -1 byte golf rearranging the parentheses to sit next to the return so no additional space is needed!



                EDIT3: Thanks to dana for -14 byte golf for the one-line return shortcut and currying the function (Ty Embodiment of Ignorance for linking to TIO).




                C# (.NET Core), 33 bytes





                a=>b=>a==b|a+b==5|(a-b)*(a-b)==25


                Try it online!






                share|improve this answer











                $endgroup$













                • $begingroup$
                  Bah. Trying to avoid System.Math. Back to it! Thanks for pointing that out :D
                  $endgroup$
                  – Destroigo
                  2 days ago






                • 1




                  $begingroup$
                  You can get it down to 33 bytes applying dana's tips
                  $endgroup$
                  – Embodiment of Ignorance
                  2 days ago





















                3












                $begingroup$


                C (gcc), 33 bytes





                f(a,b){a=!(a+b-5&&(a-=b)/6|a%5);}


                Try it online!



                Tried an approach I didn't see anyone else try using. The return expression is equivalent to a+b==5||((-6<a-b||a-b<6)&&(a-b)%5==0).









                share|improve this answer









                $endgroup$





















                  3












                  $begingroup$

                  Scala, 43 bytes





                  def f(a:Int,b:Int)=a+b==5|(a-b).abs==5|a==b


                  Try it online!






                  share|improve this answer











                  $endgroup$













                  • $begingroup$
                    Isn't it possible to golf the || to |? I know it's possible in Java, C#, Python, or JavaScript, but not sure about Scala.
                    $endgroup$
                    – Kevin Cruijssen
                    yesterday










                  • $begingroup$
                    Actually yes! thanks
                    $endgroup$
                    – Xavier Guihot
                    yesterday



















                  3












                  $begingroup$


                  Perl 6, 24 bytes



                  -1 byte thanks to Grimy





                  {$^a-$^b==5|0|-5|5-2*$b}


                  Try it online!



                  This uses the Any Junction but technically, ^ could work as well.



                  Explanation:



                  {                      }  # Anonymous code block
                  $^a-$^b== # Is the difference equal to
                  | | | # Any of
                  0
                  5
                  -5
                  5-2*$b





                  share|improve this answer











                  $endgroup$









                  • 1




                    $begingroup$
                    -1 byte with {$^a-$^b==5|0|-5|5-2*$b}
                    $endgroup$
                    – Grimy
                    yesterday



















                  2












                  $begingroup$


                  C (gcc), 41 34 bytes





                  f(a,b){a=5==abs(a-b)|a+b==5|a==b;}


                  Try it online!






                  share|improve this answer











                  $endgroup$









                  • 1




                    $begingroup$
                    Why does f return a? Just some Undefined Behavior?
                    $endgroup$
                    – Tyilo
                    2 days ago










                  • $begingroup$
                    @Tyilo Yes, it's implementation specific. So happens the first parameter is stored in the same register as the return value.
                    $endgroup$
                    – cleblanc
                    2 days ago










                  • $begingroup$
                    30 bytes Try it online!
                    $endgroup$
                    – Logern
                    2 days ago










                  • $begingroup$
                    @Logern Doesn't work for f(6,1)
                    $endgroup$
                    – cleblanc
                    2 days ago










                  • $begingroup$
                    @ceilingcat Doesn't work for f(6,1)
                    $endgroup$
                    – cleblanc
                    2 days ago



















                  1












                  $begingroup$


                  Tcl, 53 bytes



                  proc P a b {expr abs($a-$b)==5|$a==$b|abs($a+$b)==5}


                  Try it online!






                  share|improve this answer











                  $endgroup$





















                    1












                    $begingroup$


                    Japt, 14 13 bytes



                    ¥VªaU ¥5ª5¥Nx


                    Try it online!






                    share|improve this answer











                    $endgroup$





















                      1












                      $begingroup$


                      05AB1E, 13 12 bytes



                      ÐO5Qs`α5QrËO


                      Try it online!



                      Takes input as a list of integers, saving one byte. Thanks @Wisław!



                      Alternate 12 byte answer



                      Q¹²α5Q¹²+5QO


                      Try it online!



                      This one takes input on separate lines.






                      share|improve this answer











                      $endgroup$









                      • 1




                        $begingroup$
                        Since it is not very clearly specified, can you not assume the input is a list of integers, thus eliminating the initial |?
                        $endgroup$
                        – Wisław
                        2 days ago










                      • $begingroup$
                        @Wisław Good point, I updated my answer. Thanks!
                        $endgroup$
                        – Cowabunghole
                        2 days ago










                      • $begingroup$
                        I found a 11 bytes alternative: OI`αª5¢IË~Ā. Input is a list of integers.
                        $endgroup$
                        – Wisław
                        2 days ago








                      • 1




                        $begingroup$
                        OIÆÄ)5QIËM is 10.
                        $endgroup$
                        – Magic Octopus Urn
                        2 days ago






                      • 1




                        $begingroup$
                        @MagicOctopusUrn I'm not sure exactly what the rules are but I think your solution is different enough from mine to submit your own answer, no? Also, unrelated but I've seen your username on this site for a long time but only after typing it out did I realize that it's "Urn", not "Um" :)
                        $endgroup$
                        – Cowabunghole
                        2 days ago



















                      1












                      $begingroup$

                      Batch, 81 bytes



                      @set/as=%1+%2,d=%1-%2
                      @if %d% neq 0 if %d:-=% neq 5 if %s% neq 5 exit/b
                      @echo 1


                      Takes input as command-line arguments and outputs 1 on success, nothing on failure. Batch can't easily do disjunctions so I use De Morgan's laws to turn it into a conjunction.






                      share|improve this answer









                      $endgroup$





















                        1












                        $begingroup$


                        05AB1E, 10 bytes



                        OIÆ‚Ä50SåZ


                        Try it online!





                        O           # Sum the input.
                        IÆ # Reduced subtraction of the input.
                        ‚ # Wrap [sum,reduced_subtraction]
                        Ä # abs[sum,red_sub]
                        50S # [5,0]
                        å # [5,0] in abs[sum,red_sub]?
                        Z # Max of result, 0 is false, 1 is true.


                        Tried to do it using stack-only operations, but it was longer.






                        share|improve this answer









                        $endgroup$









                        • 1




                          $begingroup$
                          This will unfortunately return true if the sum is 0 such as for [5, -5]
                          $endgroup$
                          – Emigna
                          2 days ago






                        • 1




                          $begingroup$
                          Your other 10-byte solution that you left as a comment (OIÆÄ‚5QIËM) is correct for [5,-5].
                          $endgroup$
                          – Kevin Cruijssen
                          yesterday












                        • $begingroup$
                          Another 10-byte solution that I came up with is OsÆÄ‚5åsË~. Almost identical to yours it seems. Try it online!
                          $endgroup$
                          – Wisław
                          yesterday



















                        1












                        $begingroup$


                        Charcoal, 18 bytes



                        Nθ¿№⟦θ⁺⁵θ⁻⁵θ⁻θ⁵⟧N1


                        Try it online! Link is to verbose version of code. Port of @ArBo's Python 2 solution.






                        share|improve this answer









                        $endgroup$





















                          1












                          $begingroup$

                          Japt, 13 12 bytes



                          x ¥5|50ìøUra


                          Try it or run all test cases



                          x ¥5|50ìøUra
                          :Implicit input of array U
                          x :Reduce by addition
                          ¥5 :Equal to 5?
                          | :Bitwise OR
                          50ì :Split 50 to an array of digits
                          ø :Contains?
                          Ur : Reduce U
                          a : By absolute difference





                          share|improve this answer











                          $endgroup$













                          • $begingroup$
                            Fails for [-5,5] (should be falsey)
                            $endgroup$
                            – Kevin Cruijssen
                            yesterday










                          • $begingroup$
                            Thanks, @KevinCruijssen. Rolled back to the previous version.
                            $endgroup$
                            – Shaggy
                            yesterday



















                          1












                          $begingroup$

                          Common Lisp, 48 bytes



                          (lambda(a b)(find 5(list(abs(- b a))a(+ a b)b)))





                          share|improve this answer









                          $endgroup$





















                            0












                            $begingroup$


                            Runic Enchantments, 30 bytes



                            i::i::}3s=?!@-'|A"5"n:}=?!@+=@


                            Try it online!



                            With a pending update, 4 bytes can be saved, as presently integer inputs are treated as doubles and don't equal integers of the same value. Hence "5"n instead of just 5. This was an oversight and several factors are being adjusted to account for it (such as using Approximately(a, b) instead of a.Equals(b)).



                            Outputs 0 (exactly one zero) for false and any other output (literally whatever is left on the stack) for true.






                            share|improve this answer









                            $endgroup$





















                              0












                              $begingroup$


                              Retina 0.8.2, 82 bytes



                              d+
                              $*
                              ^(-?1*) 1$|^(-?1*)1{5} -?2$|^-?(-?1*) (3)1{5}$|^-?(1 ?){5}$|^(1 ?-?){5}$


                              Try it online! Link includes test cases. Explanation: The first two lines convert the inputs into unary. The final line then checks for any of the permitted matches:



                              ^(-?1*) 1$                              x==y
                              ^(-?1*)1{5} -?2$ x>=0 y>=0 x=5+y i.e. x-y=5
                              x>=0 y<=0 x=5-y i.e. x+y=5
                              x<=0 y<=0 x=y-5 i.e. y-x=5
                              ^-?(-?1*) (3)1{5}$ x<=0 y<=0 y=x-5 i.e. x-y=5
                              x<=0 y>=0 y=5-x i.e. x+y=5
                              x>=0 y>=0 y=5+x i.e. y-x=5
                              ^-?(1 ?){5}$ x>=0 y>=0 y=5-x i.e. x+y=5
                              x<=0 y>=0 y=5+x i.e. y-x=5
                              ^(1 ?-?){5}$ x>=0 y>=0 x=5-y i.e. x+y=5
                              x>=0 y<=0 x=5+y i.e. x-y=5


                              Pivoted by the last column we get:



                              x==y            ^(-?1*) 1$
                              x+y=5 x>=0 y>=0 ^-?(1 ?){5}$
                              x>=0 y>=0 ^(1 ?-?){5}$
                              x>=0 y<=0 ^(-?1*)1{5} -?2$
                              x<=0 y>=0 ^-?(-?1*) (3)1{5}$
                              x<=0 y<=0 (impossible)
                              x-y=5 x>=0 y>=0 ^(-?1*)1{5} -?2$
                              x>=0 y<=0 ^(1 ?-?){5}$
                              x<=0 y>=0 (impossible)
                              x<=0 y<=0 ^-?(-?1*) (3)1{5}$
                              y-x=5 x>=0 y>=0 ^-?(-?1*) (3)1{5}$
                              x>=0 y<=0 (impossible)
                              x<=0 y>=0 ^-?(1 ?){5}$
                              x<=0 y<=0 ^(-?1*)1{5} -?2$





                              share|improve this answer









                              $endgroup$





















                                0












                                $begingroup$


                                Perl 5, 51 bytes



                                Pretty simple really, uses the an flags for input. Outputs 0 for false, 1 for true. Not gonna lie, I don't know if bitwise OR is appropriate here, but is does work for all the test cases, so that's nice.





                                ($a,$b)=@F;print($a==$b|$a+$b==5|$a-$b==5|$b-$a==5)


                                Try it online!






                                share|improve this answer











                                $endgroup$









                                • 1




                                  $begingroup$
                                  bitwise OR is equivalent to logical OR when operating on one-bit values. In general, if passed a truthy arguments bitwise OR will return truthy, and if passed two falsy arguments bitwise OR will return 0.
                                  $endgroup$
                                  – attinat
                                  yesterday





















                                0












                                $begingroup$


                                Julia 1.0, 38 bytes





                                f(a,b)=((a+b-5)*(a-b)*(abs(a-b)-5))==0


                                Try it online!



                                Of course, it's probably not the shortest one






                                share|improve this answer









                                $endgroup$













                                  Your Answer





                                  StackExchange.ifUsing("editor", function () {
                                  return StackExchange.using("mathjaxEditing", function () {
                                  StackExchange.MarkdownEditor.creationCallbacks.add(function (editor, postfix) {
                                  StackExchange.mathjaxEditing.prepareWmdForMathJax(editor, postfix, [["\$", "\$"]]);
                                  });
                                  });
                                  }, "mathjax-editing");

                                  StackExchange.ifUsing("editor", function () {
                                  StackExchange.using("externalEditor", function () {
                                  StackExchange.using("snippets", function () {
                                  StackExchange.snippets.init();
                                  });
                                  });
                                  }, "code-snippets");

                                  StackExchange.ready(function() {
                                  var channelOptions = {
                                  tags: "".split(" "),
                                  id: "200"
                                  };
                                  initTagRenderer("".split(" "), "".split(" "), channelOptions);

                                  StackExchange.using("externalEditor", function() {
                                  // Have to fire editor after snippets, if snippets enabled
                                  if (StackExchange.settings.snippets.snippetsEnabled) {
                                  StackExchange.using("snippets", function() {
                                  createEditor();
                                  });
                                  }
                                  else {
                                  createEditor();
                                  }
                                  });

                                  function createEditor() {
                                  StackExchange.prepareEditor({
                                  heartbeatType: 'answer',
                                  autoActivateHeartbeat: false,
                                  convertImagesToLinks: false,
                                  noModals: true,
                                  showLowRepImageUploadWarning: true,
                                  reputationToPostImages: null,
                                  bindNavPrevention: true,
                                  postfix: "",
                                  imageUploader: {
                                  brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
                                  contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
                                  allowUrls: true
                                  },
                                  onDemand: true,
                                  discardSelector: ".discard-answer"
                                  ,immediatelyShowMarkdownHelp:true
                                  });


                                  }
                                  });






                                  Vikrant Biswas is a new contributor. Be nice, and check out our Code of Conduct.










                                  draft saved

                                  draft discarded


















                                  StackExchange.ready(
                                  function () {
                                  StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fcodegolf.stackexchange.com%2fquestions%2f178792%2fequal-sum-or-difference%23new-answer', 'question_page');
                                  }
                                  );

                                  Post as a guest















                                  Required, but never shown

























                                  30 Answers
                                  30






                                  active

                                  oldest

                                  votes








                                  30 Answers
                                  30






                                  active

                                  oldest

                                  votes









                                  active

                                  oldest

                                  votes






                                  active

                                  oldest

                                  votes









                                  20












                                  $begingroup$


                                  Python 2, 30 bytes





                                  lambda a,b:a in(b,5-b,b-5,b+5)


                                  Try it online!



                                  One byte saved by Arnauld



                                  Three bytes saved by alephalpha






                                  share|improve this answer











                                  $endgroup$













                                  • $begingroup$
                                    This is amazingly concise, thanks
                                    $endgroup$
                                    – Vikrant Biswas
                                    2 days ago










                                  • $begingroup$
                                    Same can be done in Octave/MATLAB in 29 bytes (Try it online!).
                                    $endgroup$
                                    – Tom Carpenter
                                    yesterday
















                                  20












                                  $begingroup$


                                  Python 2, 30 bytes





                                  lambda a,b:a in(b,5-b,b-5,b+5)


                                  Try it online!



                                  One byte saved by Arnauld



                                  Three bytes saved by alephalpha






                                  share|improve this answer











                                  $endgroup$













                                  • $begingroup$
                                    This is amazingly concise, thanks
                                    $endgroup$
                                    – Vikrant Biswas
                                    2 days ago










                                  • $begingroup$
                                    Same can be done in Octave/MATLAB in 29 bytes (Try it online!).
                                    $endgroup$
                                    – Tom Carpenter
                                    yesterday














                                  20












                                  20








                                  20





                                  $begingroup$


                                  Python 2, 30 bytes





                                  lambda a,b:a in(b,5-b,b-5,b+5)


                                  Try it online!



                                  One byte saved by Arnauld



                                  Three bytes saved by alephalpha






                                  share|improve this answer











                                  $endgroup$




                                  Python 2, 30 bytes





                                  lambda a,b:a in(b,5-b,b-5,b+5)


                                  Try it online!



                                  One byte saved by Arnauld



                                  Three bytes saved by alephalpha







                                  share|improve this answer














                                  share|improve this answer



                                  share|improve this answer








                                  edited 2 days ago

























                                  answered 2 days ago









                                  ArBoArBo

                                  31115




                                  31115












                                  • $begingroup$
                                    This is amazingly concise, thanks
                                    $endgroup$
                                    – Vikrant Biswas
                                    2 days ago










                                  • $begingroup$
                                    Same can be done in Octave/MATLAB in 29 bytes (Try it online!).
                                    $endgroup$
                                    – Tom Carpenter
                                    yesterday


















                                  • $begingroup$
                                    This is amazingly concise, thanks
                                    $endgroup$
                                    – Vikrant Biswas
                                    2 days ago










                                  • $begingroup$
                                    Same can be done in Octave/MATLAB in 29 bytes (Try it online!).
                                    $endgroup$
                                    – Tom Carpenter
                                    yesterday
















                                  $begingroup$
                                  This is amazingly concise, thanks
                                  $endgroup$
                                  – Vikrant Biswas
                                  2 days ago




                                  $begingroup$
                                  This is amazingly concise, thanks
                                  $endgroup$
                                  – Vikrant Biswas
                                  2 days ago












                                  $begingroup$
                                  Same can be done in Octave/MATLAB in 29 bytes (Try it online!).
                                  $endgroup$
                                  – Tom Carpenter
                                  yesterday




                                  $begingroup$
                                  Same can be done in Octave/MATLAB in 29 bytes (Try it online!).
                                  $endgroup$
                                  – Tom Carpenter
                                  yesterday











                                  15












                                  $begingroup$

                                  JavaScript (ES6), 28 bytes



                                  Takes input as (a)(b). Returns $0$ or $1$.





                                  a=>b=>a+b==5|!(a-=b)|a*a==25


                                  Try it online!






                                  share|improve this answer











                                  $endgroup$









                                  • 1




                                    $begingroup$
                                    Damn, took me a long long time to figure out how this handling the difference part. :)
                                    $endgroup$
                                    – Vikrant Biswas
                                    2 days ago
















                                  15












                                  $begingroup$

                                  JavaScript (ES6), 28 bytes



                                  Takes input as (a)(b). Returns $0$ or $1$.





                                  a=>b=>a+b==5|!(a-=b)|a*a==25


                                  Try it online!






                                  share|improve this answer











                                  $endgroup$









                                  • 1




                                    $begingroup$
                                    Damn, took me a long long time to figure out how this handling the difference part. :)
                                    $endgroup$
                                    – Vikrant Biswas
                                    2 days ago














                                  15












                                  15








                                  15





                                  $begingroup$

                                  JavaScript (ES6), 28 bytes



                                  Takes input as (a)(b). Returns $0$ or $1$.





                                  a=>b=>a+b==5|!(a-=b)|a*a==25


                                  Try it online!






                                  share|improve this answer











                                  $endgroup$



                                  JavaScript (ES6), 28 bytes



                                  Takes input as (a)(b). Returns $0$ or $1$.





                                  a=>b=>a+b==5|!(a-=b)|a*a==25


                                  Try it online!







                                  share|improve this answer














                                  share|improve this answer



                                  share|improve this answer








                                  edited 2 days ago

























                                  answered 2 days ago









                                  ArnauldArnauld

                                  73.5k689309




                                  73.5k689309








                                  • 1




                                    $begingroup$
                                    Damn, took me a long long time to figure out how this handling the difference part. :)
                                    $endgroup$
                                    – Vikrant Biswas
                                    2 days ago














                                  • 1




                                    $begingroup$
                                    Damn, took me a long long time to figure out how this handling the difference part. :)
                                    $endgroup$
                                    – Vikrant Biswas
                                    2 days ago








                                  1




                                  1




                                  $begingroup$
                                  Damn, took me a long long time to figure out how this handling the difference part. :)
                                  $endgroup$
                                  – Vikrant Biswas
                                  2 days ago




                                  $begingroup$
                                  Damn, took me a long long time to figure out how this handling the difference part. :)
                                  $endgroup$
                                  – Vikrant Biswas
                                  2 days ago











                                  8












                                  $begingroup$


                                  Dyalog APL, 9 bytes





                                  =∨5∊+,∘|-


                                  Try it online!



                                  Spelled out:



                                    =   ∨  5      ∊                +   , ∘    |            -
                                  equal or 5 found in an array of sum and absolute of difference.





                                  share|improve this answer











                                  $endgroup$


















                                    8












                                    $begingroup$


                                    Dyalog APL, 9 bytes





                                    =∨5∊+,∘|-


                                    Try it online!



                                    Spelled out:



                                      =   ∨  5      ∊                +   , ∘    |            -
                                    equal or 5 found in an array of sum and absolute of difference.





                                    share|improve this answer











                                    $endgroup$
















                                      8












                                      8








                                      8





                                      $begingroup$


                                      Dyalog APL, 9 bytes





                                      =∨5∊+,∘|-


                                      Try it online!



                                      Spelled out:



                                        =   ∨  5      ∊                +   , ∘    |            -
                                      equal or 5 found in an array of sum and absolute of difference.





                                      share|improve this answer











                                      $endgroup$




                                      Dyalog APL, 9 bytes





                                      =∨5∊+,∘|-


                                      Try it online!



                                      Spelled out:



                                        =   ∨  5      ∊                +   , ∘    |            -
                                      equal or 5 found in an array of sum and absolute of difference.






                                      share|improve this answer














                                      share|improve this answer



                                      share|improve this answer








                                      edited 2 days ago

























                                      answered 2 days ago









                                      dzaimadzaima

                                      14.6k21755




                                      14.6k21755























                                          6












                                          $begingroup$

                                          x86 machine code, 39 bytes



                                          00000000: 6a01 5e6a 055f 5251 31c0 39d1 0f44 c601  j.^j._RQ1.9..D..
                                          00000010: d139 cf0f 44c6 595a 29d1 83f9 050f 44c6 .9..D.YZ).....D.
                                          00000020: 83f9 fb0f 44c6 c3 ....D..


                                          Assembly





                                          section .text
                                          global func
                                          func: ;inputs int32_t ecx and edx
                                          push 0x1
                                          pop esi
                                          push 0x5
                                          pop edi
                                          push edx
                                          push ecx
                                          xor eax, eax

                                          ;ecx==edx?
                                          cmp ecx, edx
                                          cmove eax, esi

                                          ;ecx+edx==5?
                                          add ecx, edx
                                          cmp edi, ecx
                                          cmove eax, esi

                                          ;ecx-edx==5?
                                          pop ecx
                                          pop edx
                                          sub ecx, edx
                                          cmp ecx, 5

                                          ;ecx-edx==-5?
                                          cmove eax, esi
                                          cmp ecx, -5
                                          cmove eax, esi

                                          ret


                                          Try it online!






                                          share|improve this answer









                                          $endgroup$


















                                            6












                                            $begingroup$

                                            x86 machine code, 39 bytes



                                            00000000: 6a01 5e6a 055f 5251 31c0 39d1 0f44 c601  j.^j._RQ1.9..D..
                                            00000010: d139 cf0f 44c6 595a 29d1 83f9 050f 44c6 .9..D.YZ).....D.
                                            00000020: 83f9 fb0f 44c6 c3 ....D..


                                            Assembly





                                            section .text
                                            global func
                                            func: ;inputs int32_t ecx and edx
                                            push 0x1
                                            pop esi
                                            push 0x5
                                            pop edi
                                            push edx
                                            push ecx
                                            xor eax, eax

                                            ;ecx==edx?
                                            cmp ecx, edx
                                            cmove eax, esi

                                            ;ecx+edx==5?
                                            add ecx, edx
                                            cmp edi, ecx
                                            cmove eax, esi

                                            ;ecx-edx==5?
                                            pop ecx
                                            pop edx
                                            sub ecx, edx
                                            cmp ecx, 5

                                            ;ecx-edx==-5?
                                            cmove eax, esi
                                            cmp ecx, -5
                                            cmove eax, esi

                                            ret


                                            Try it online!






                                            share|improve this answer









                                            $endgroup$
















                                              6












                                              6








                                              6





                                              $begingroup$

                                              x86 machine code, 39 bytes



                                              00000000: 6a01 5e6a 055f 5251 31c0 39d1 0f44 c601  j.^j._RQ1.9..D..
                                              00000010: d139 cf0f 44c6 595a 29d1 83f9 050f 44c6 .9..D.YZ).....D.
                                              00000020: 83f9 fb0f 44c6 c3 ....D..


                                              Assembly





                                              section .text
                                              global func
                                              func: ;inputs int32_t ecx and edx
                                              push 0x1
                                              pop esi
                                              push 0x5
                                              pop edi
                                              push edx
                                              push ecx
                                              xor eax, eax

                                              ;ecx==edx?
                                              cmp ecx, edx
                                              cmove eax, esi

                                              ;ecx+edx==5?
                                              add ecx, edx
                                              cmp edi, ecx
                                              cmove eax, esi

                                              ;ecx-edx==5?
                                              pop ecx
                                              pop edx
                                              sub ecx, edx
                                              cmp ecx, 5

                                              ;ecx-edx==-5?
                                              cmove eax, esi
                                              cmp ecx, -5
                                              cmove eax, esi

                                              ret


                                              Try it online!






                                              share|improve this answer









                                              $endgroup$



                                              x86 machine code, 39 bytes



                                              00000000: 6a01 5e6a 055f 5251 31c0 39d1 0f44 c601  j.^j._RQ1.9..D..
                                              00000010: d139 cf0f 44c6 595a 29d1 83f9 050f 44c6 .9..D.YZ).....D.
                                              00000020: 83f9 fb0f 44c6 c3 ....D..


                                              Assembly





                                              section .text
                                              global func
                                              func: ;inputs int32_t ecx and edx
                                              push 0x1
                                              pop esi
                                              push 0x5
                                              pop edi
                                              push edx
                                              push ecx
                                              xor eax, eax

                                              ;ecx==edx?
                                              cmp ecx, edx
                                              cmove eax, esi

                                              ;ecx+edx==5?
                                              add ecx, edx
                                              cmp edi, ecx
                                              cmove eax, esi

                                              ;ecx-edx==5?
                                              pop ecx
                                              pop edx
                                              sub ecx, edx
                                              cmp ecx, 5

                                              ;ecx-edx==-5?
                                              cmove eax, esi
                                              cmp ecx, -5
                                              cmove eax, esi

                                              ret


                                              Try it online!







                                              share|improve this answer












                                              share|improve this answer



                                              share|improve this answer










                                              answered 2 days ago









                                              LogernLogern

                                              78546




                                              78546























                                                  5












                                                  $begingroup$


                                                  R, 40 bytes (or 34)





                                                  function(x,y)any((-1:1*5)%in%c(x+y,x-y))


                                                  Try it online!



                                                  For non-R users:





                                                  • -1:1*5 expands to [-5, 0, 5]

                                                  • the %in% operator takes elements from the left and checks (element-wise) if they exist in the vector on the right


                                                  A direct port of @ArBo's solution has 35 34 bytes, so go upvote that answer if you like it:



                                                  function(x,y)x%in%c(y--1:1*5,5-y)





                                                  share|improve this answer











                                                  $endgroup$













                                                  • $begingroup$
                                                    The 34 byte one can be reduced by 1 with function(x,y)x%in%c(y--1:1*5,5-y)
                                                    $endgroup$
                                                    – MickyT
                                                    2 days ago










                                                  • $begingroup$
                                                    Can drop to 30 bytes by moving the subtraction: function(x,y)(x-y)%in%(-1:1*5), and drop it further to 24 bytes by dropping the function notation to scan() input: diff(scan())%in%(-1:1*5) Try it online!. Still very much the same method though.
                                                    $endgroup$
                                                    – CriminallyVulgar
                                                    yesterday








                                                  • 1




                                                    $begingroup$
                                                    @CriminallyVulgar does that account for the sum being 5?
                                                    $endgroup$
                                                    – ArBo
                                                    yesterday










                                                  • $begingroup$
                                                    @ArBo Hah, missed that in the spec, and there wasn't a test case in the TIO so I just glossed over it!
                                                    $endgroup$
                                                    – CriminallyVulgar
                                                    21 hours ago










                                                  • $begingroup$
                                                    Minor change that can be made to both is to use pryr::f, which happens to work in both cases. Whether it can properly detect the arguments is entirely somewhat hit or miss but it seems to nail these two functions. e.g. pryr::f(x%in%c(y--1:1*5,5-y)) Try it online!. Gets you to 36 and 29 bytes respectively.
                                                    $endgroup$
                                                    – CriminallyVulgar
                                                    14 hours ago
















                                                  5












                                                  $begingroup$


                                                  R, 40 bytes (or 34)





                                                  function(x,y)any((-1:1*5)%in%c(x+y,x-y))


                                                  Try it online!



                                                  For non-R users:





                                                  • -1:1*5 expands to [-5, 0, 5]

                                                  • the %in% operator takes elements from the left and checks (element-wise) if they exist in the vector on the right


                                                  A direct port of @ArBo's solution has 35 34 bytes, so go upvote that answer if you like it:



                                                  function(x,y)x%in%c(y--1:1*5,5-y)





                                                  share|improve this answer











                                                  $endgroup$













                                                  • $begingroup$
                                                    The 34 byte one can be reduced by 1 with function(x,y)x%in%c(y--1:1*5,5-y)
                                                    $endgroup$
                                                    – MickyT
                                                    2 days ago










                                                  • $begingroup$
                                                    Can drop to 30 bytes by moving the subtraction: function(x,y)(x-y)%in%(-1:1*5), and drop it further to 24 bytes by dropping the function notation to scan() input: diff(scan())%in%(-1:1*5) Try it online!. Still very much the same method though.
                                                    $endgroup$
                                                    – CriminallyVulgar
                                                    yesterday








                                                  • 1




                                                    $begingroup$
                                                    @CriminallyVulgar does that account for the sum being 5?
                                                    $endgroup$
                                                    – ArBo
                                                    yesterday










                                                  • $begingroup$
                                                    @ArBo Hah, missed that in the spec, and there wasn't a test case in the TIO so I just glossed over it!
                                                    $endgroup$
                                                    – CriminallyVulgar
                                                    21 hours ago










                                                  • $begingroup$
                                                    Minor change that can be made to both is to use pryr::f, which happens to work in both cases. Whether it can properly detect the arguments is entirely somewhat hit or miss but it seems to nail these two functions. e.g. pryr::f(x%in%c(y--1:1*5,5-y)) Try it online!. Gets you to 36 and 29 bytes respectively.
                                                    $endgroup$
                                                    – CriminallyVulgar
                                                    14 hours ago














                                                  5












                                                  5








                                                  5





                                                  $begingroup$


                                                  R, 40 bytes (or 34)





                                                  function(x,y)any((-1:1*5)%in%c(x+y,x-y))


                                                  Try it online!



                                                  For non-R users:





                                                  • -1:1*5 expands to [-5, 0, 5]

                                                  • the %in% operator takes elements from the left and checks (element-wise) if they exist in the vector on the right


                                                  A direct port of @ArBo's solution has 35 34 bytes, so go upvote that answer if you like it:



                                                  function(x,y)x%in%c(y--1:1*5,5-y)





                                                  share|improve this answer











                                                  $endgroup$




                                                  R, 40 bytes (or 34)





                                                  function(x,y)any((-1:1*5)%in%c(x+y,x-y))


                                                  Try it online!



                                                  For non-R users:





                                                  • -1:1*5 expands to [-5, 0, 5]

                                                  • the %in% operator takes elements from the left and checks (element-wise) if they exist in the vector on the right


                                                  A direct port of @ArBo's solution has 35 34 bytes, so go upvote that answer if you like it:



                                                  function(x,y)x%in%c(y--1:1*5,5-y)






                                                  share|improve this answer














                                                  share|improve this answer



                                                  share|improve this answer








                                                  edited 2 days ago

























                                                  answered 2 days ago









                                                  ngmngm

                                                  3,33924




                                                  3,33924












                                                  • $begingroup$
                                                    The 34 byte one can be reduced by 1 with function(x,y)x%in%c(y--1:1*5,5-y)
                                                    $endgroup$
                                                    – MickyT
                                                    2 days ago










                                                  • $begingroup$
                                                    Can drop to 30 bytes by moving the subtraction: function(x,y)(x-y)%in%(-1:1*5), and drop it further to 24 bytes by dropping the function notation to scan() input: diff(scan())%in%(-1:1*5) Try it online!. Still very much the same method though.
                                                    $endgroup$
                                                    – CriminallyVulgar
                                                    yesterday








                                                  • 1




                                                    $begingroup$
                                                    @CriminallyVulgar does that account for the sum being 5?
                                                    $endgroup$
                                                    – ArBo
                                                    yesterday










                                                  • $begingroup$
                                                    @ArBo Hah, missed that in the spec, and there wasn't a test case in the TIO so I just glossed over it!
                                                    $endgroup$
                                                    – CriminallyVulgar
                                                    21 hours ago










                                                  • $begingroup$
                                                    Minor change that can be made to both is to use pryr::f, which happens to work in both cases. Whether it can properly detect the arguments is entirely somewhat hit or miss but it seems to nail these two functions. e.g. pryr::f(x%in%c(y--1:1*5,5-y)) Try it online!. Gets you to 36 and 29 bytes respectively.
                                                    $endgroup$
                                                    – CriminallyVulgar
                                                    14 hours ago


















                                                  • $begingroup$
                                                    The 34 byte one can be reduced by 1 with function(x,y)x%in%c(y--1:1*5,5-y)
                                                    $endgroup$
                                                    – MickyT
                                                    2 days ago










                                                  • $begingroup$
                                                    Can drop to 30 bytes by moving the subtraction: function(x,y)(x-y)%in%(-1:1*5), and drop it further to 24 bytes by dropping the function notation to scan() input: diff(scan())%in%(-1:1*5) Try it online!. Still very much the same method though.
                                                    $endgroup$
                                                    – CriminallyVulgar
                                                    yesterday








                                                  • 1




                                                    $begingroup$
                                                    @CriminallyVulgar does that account for the sum being 5?
                                                    $endgroup$
                                                    – ArBo
                                                    yesterday










                                                  • $begingroup$
                                                    @ArBo Hah, missed that in the spec, and there wasn't a test case in the TIO so I just glossed over it!
                                                    $endgroup$
                                                    – CriminallyVulgar
                                                    21 hours ago










                                                  • $begingroup$
                                                    Minor change that can be made to both is to use pryr::f, which happens to work in both cases. Whether it can properly detect the arguments is entirely somewhat hit or miss but it seems to nail these two functions. e.g. pryr::f(x%in%c(y--1:1*5,5-y)) Try it online!. Gets you to 36 and 29 bytes respectively.
                                                    $endgroup$
                                                    – CriminallyVulgar
                                                    14 hours ago
















                                                  $begingroup$
                                                  The 34 byte one can be reduced by 1 with function(x,y)x%in%c(y--1:1*5,5-y)
                                                  $endgroup$
                                                  – MickyT
                                                  2 days ago




                                                  $begingroup$
                                                  The 34 byte one can be reduced by 1 with function(x,y)x%in%c(y--1:1*5,5-y)
                                                  $endgroup$
                                                  – MickyT
                                                  2 days ago












                                                  $begingroup$
                                                  Can drop to 30 bytes by moving the subtraction: function(x,y)(x-y)%in%(-1:1*5), and drop it further to 24 bytes by dropping the function notation to scan() input: diff(scan())%in%(-1:1*5) Try it online!. Still very much the same method though.
                                                  $endgroup$
                                                  – CriminallyVulgar
                                                  yesterday






                                                  $begingroup$
                                                  Can drop to 30 bytes by moving the subtraction: function(x,y)(x-y)%in%(-1:1*5), and drop it further to 24 bytes by dropping the function notation to scan() input: diff(scan())%in%(-1:1*5) Try it online!. Still very much the same method though.
                                                  $endgroup$
                                                  – CriminallyVulgar
                                                  yesterday






                                                  1




                                                  1




                                                  $begingroup$
                                                  @CriminallyVulgar does that account for the sum being 5?
                                                  $endgroup$
                                                  – ArBo
                                                  yesterday




                                                  $begingroup$
                                                  @CriminallyVulgar does that account for the sum being 5?
                                                  $endgroup$
                                                  – ArBo
                                                  yesterday












                                                  $begingroup$
                                                  @ArBo Hah, missed that in the spec, and there wasn't a test case in the TIO so I just glossed over it!
                                                  $endgroup$
                                                  – CriminallyVulgar
                                                  21 hours ago




                                                  $begingroup$
                                                  @ArBo Hah, missed that in the spec, and there wasn't a test case in the TIO so I just glossed over it!
                                                  $endgroup$
                                                  – CriminallyVulgar
                                                  21 hours ago












                                                  $begingroup$
                                                  Minor change that can be made to both is to use pryr::f, which happens to work in both cases. Whether it can properly detect the arguments is entirely somewhat hit or miss but it seems to nail these two functions. e.g. pryr::f(x%in%c(y--1:1*5,5-y)) Try it online!. Gets you to 36 and 29 bytes respectively.
                                                  $endgroup$
                                                  – CriminallyVulgar
                                                  14 hours ago




                                                  $begingroup$
                                                  Minor change that can be made to both is to use pryr::f, which happens to work in both cases. Whether it can properly detect the arguments is entirely somewhat hit or miss but it seems to nail these two functions. e.g. pryr::f(x%in%c(y--1:1*5,5-y)) Try it online!. Gets you to 36 and 29 bytes respectively.
                                                  $endgroup$
                                                  – CriminallyVulgar
                                                  14 hours ago











                                                  4












                                                  $begingroup$


                                                  Jelly, 7 bytes



                                                  +,ạ5eo=


                                                  Try it online!



                                                  How it works



                                                  +,ạ5eo=  Main link. Arguments: x, y (integers)

                                                  + Yield x+y.
                                                  ạ Yield |x-y|.
                                                  , Pair; yield (x+y, |x-y|).
                                                  5e Test fi 5 exists in the pair.
                                                  = Test x and y for equality.
                                                  o Logical OR.





                                                  share|improve this answer









                                                  $endgroup$


















                                                    4












                                                    $begingroup$


                                                    Jelly, 7 bytes



                                                    +,ạ5eo=


                                                    Try it online!



                                                    How it works



                                                    +,ạ5eo=  Main link. Arguments: x, y (integers)

                                                    + Yield x+y.
                                                    ạ Yield |x-y|.
                                                    , Pair; yield (x+y, |x-y|).
                                                    5e Test fi 5 exists in the pair.
                                                    = Test x and y for equality.
                                                    o Logical OR.





                                                    share|improve this answer









                                                    $endgroup$
















                                                      4












                                                      4








                                                      4





                                                      $begingroup$


                                                      Jelly, 7 bytes



                                                      +,ạ5eo=


                                                      Try it online!



                                                      How it works



                                                      +,ạ5eo=  Main link. Arguments: x, y (integers)

                                                      + Yield x+y.
                                                      ạ Yield |x-y|.
                                                      , Pair; yield (x+y, |x-y|).
                                                      5e Test fi 5 exists in the pair.
                                                      = Test x and y for equality.
                                                      o Logical OR.





                                                      share|improve this answer









                                                      $endgroup$




                                                      Jelly, 7 bytes



                                                      +,ạ5eo=


                                                      Try it online!



                                                      How it works



                                                      +,ạ5eo=  Main link. Arguments: x, y (integers)

                                                      + Yield x+y.
                                                      ạ Yield |x-y|.
                                                      , Pair; yield (x+y, |x-y|).
                                                      5e Test fi 5 exists in the pair.
                                                      = Test x and y for equality.
                                                      o Logical OR.






                                                      share|improve this answer












                                                      share|improve this answer



                                                      share|improve this answer










                                                      answered 2 days ago









                                                      DennisDennis

                                                      187k32297737




                                                      187k32297737























                                                          4












                                                          $begingroup$


                                                          J, 12 11 bytes



                                                          1 byte saved thanks to Adám



                                                          1#.=+5=|@-,+


                                                          Try it online!



                                                          Explanation



                                                          This is equivalent to:



                                                          1 #. = + 5 = |@- , +


                                                          This can be divided into the following fork chain:



                                                          (= + (5 e. (|@- , +)))


                                                          Or, visualized using 5!:4<'f':



                                                            ┌─ =               
                                                          ├─ +
                                                          ──┤ ┌─ 5
                                                          │ ├─ e.
                                                          └───┤ ┌─ |
                                                          │ ┌─ @ ─┴─ -
                                                          └────┼─ ,
                                                          └─ +


                                                          Annotated:



                                                            ┌─ =                                     equality
                                                          ├─ + added to (boolean or)
                                                          ──┤ ┌─ 5 noun 5
                                                          │ ├─ e. is an element of
                                                          └───┤ ┌─ | absolute value |
                                                          │ ┌─ @ ─┴─ - (of) subtraction |
                                                          └────┼─ , paired with |
                                                          └─ + addition | any of these?





                                                          share|improve this answer











                                                          $endgroup$













                                                          • $begingroup$
                                                            Save a byte with e.
                                                            $endgroup$
                                                            – Adám
                                                            2 days ago










                                                          • $begingroup$
                                                            @Adám How so? Shortest approach I got with e. was =+.5 e.|@-,+. Maybe you forget 5e. is an invalid token in J?
                                                            $endgroup$
                                                            – Conor O'Brien
                                                            2 days ago










                                                          • $begingroup$
                                                            Since two integers cannot simultaneously sum to 5 and be equal, you can use + instead of +.
                                                            $endgroup$
                                                            – Adám
                                                            2 days ago










                                                          • $begingroup$
                                                            @Adám Ah, I see, thank you.
                                                            $endgroup$
                                                            – Conor O'Brien
                                                            2 days ago
















                                                          4












                                                          $begingroup$


                                                          J, 12 11 bytes



                                                          1 byte saved thanks to Adám



                                                          1#.=+5=|@-,+


                                                          Try it online!



                                                          Explanation



                                                          This is equivalent to:



                                                          1 #. = + 5 = |@- , +


                                                          This can be divided into the following fork chain:



                                                          (= + (5 e. (|@- , +)))


                                                          Or, visualized using 5!:4<'f':



                                                            ┌─ =               
                                                          ├─ +
                                                          ──┤ ┌─ 5
                                                          │ ├─ e.
                                                          └───┤ ┌─ |
                                                          │ ┌─ @ ─┴─ -
                                                          └────┼─ ,
                                                          └─ +


                                                          Annotated:



                                                            ┌─ =                                     equality
                                                          ├─ + added to (boolean or)
                                                          ──┤ ┌─ 5 noun 5
                                                          │ ├─ e. is an element of
                                                          └───┤ ┌─ | absolute value |
                                                          │ ┌─ @ ─┴─ - (of) subtraction |
                                                          └────┼─ , paired with |
                                                          └─ + addition | any of these?





                                                          share|improve this answer











                                                          $endgroup$













                                                          • $begingroup$
                                                            Save a byte with e.
                                                            $endgroup$
                                                            – Adám
                                                            2 days ago










                                                          • $begingroup$
                                                            @Adám How so? Shortest approach I got with e. was =+.5 e.|@-,+. Maybe you forget 5e. is an invalid token in J?
                                                            $endgroup$
                                                            – Conor O'Brien
                                                            2 days ago










                                                          • $begingroup$
                                                            Since two integers cannot simultaneously sum to 5 and be equal, you can use + instead of +.
                                                            $endgroup$
                                                            – Adám
                                                            2 days ago










                                                          • $begingroup$
                                                            @Adám Ah, I see, thank you.
                                                            $endgroup$
                                                            – Conor O'Brien
                                                            2 days ago














                                                          4












                                                          4








                                                          4





                                                          $begingroup$


                                                          J, 12 11 bytes



                                                          1 byte saved thanks to Adám



                                                          1#.=+5=|@-,+


                                                          Try it online!



                                                          Explanation



                                                          This is equivalent to:



                                                          1 #. = + 5 = |@- , +


                                                          This can be divided into the following fork chain:



                                                          (= + (5 e. (|@- , +)))


                                                          Or, visualized using 5!:4<'f':



                                                            ┌─ =               
                                                          ├─ +
                                                          ──┤ ┌─ 5
                                                          │ ├─ e.
                                                          └───┤ ┌─ |
                                                          │ ┌─ @ ─┴─ -
                                                          └────┼─ ,
                                                          └─ +


                                                          Annotated:



                                                            ┌─ =                                     equality
                                                          ├─ + added to (boolean or)
                                                          ──┤ ┌─ 5 noun 5
                                                          │ ├─ e. is an element of
                                                          └───┤ ┌─ | absolute value |
                                                          │ ┌─ @ ─┴─ - (of) subtraction |
                                                          └────┼─ , paired with |
                                                          └─ + addition | any of these?





                                                          share|improve this answer











                                                          $endgroup$




                                                          J, 12 11 bytes



                                                          1 byte saved thanks to Adám



                                                          1#.=+5=|@-,+


                                                          Try it online!



                                                          Explanation



                                                          This is equivalent to:



                                                          1 #. = + 5 = |@- , +


                                                          This can be divided into the following fork chain:



                                                          (= + (5 e. (|@- , +)))


                                                          Or, visualized using 5!:4<'f':



                                                            ┌─ =               
                                                          ├─ +
                                                          ──┤ ┌─ 5
                                                          │ ├─ e.
                                                          └───┤ ┌─ |
                                                          │ ┌─ @ ─┴─ -
                                                          └────┼─ ,
                                                          └─ +


                                                          Annotated:



                                                            ┌─ =                                     equality
                                                          ├─ + added to (boolean or)
                                                          ──┤ ┌─ 5 noun 5
                                                          │ ├─ e. is an element of
                                                          └───┤ ┌─ | absolute value |
                                                          │ ┌─ @ ─┴─ - (of) subtraction |
                                                          └────┼─ , paired with |
                                                          └─ + addition | any of these?






                                                          share|improve this answer














                                                          share|improve this answer



                                                          share|improve this answer








                                                          edited 2 days ago

























                                                          answered 2 days ago









                                                          Conor O'BrienConor O'Brien

                                                          29.2k263162




                                                          29.2k263162












                                                          • $begingroup$
                                                            Save a byte with e.
                                                            $endgroup$
                                                            – Adám
                                                            2 days ago










                                                          • $begingroup$
                                                            @Adám How so? Shortest approach I got with e. was =+.5 e.|@-,+. Maybe you forget 5e. is an invalid token in J?
                                                            $endgroup$
                                                            – Conor O'Brien
                                                            2 days ago










                                                          • $begingroup$
                                                            Since two integers cannot simultaneously sum to 5 and be equal, you can use + instead of +.
                                                            $endgroup$
                                                            – Adám
                                                            2 days ago










                                                          • $begingroup$
                                                            @Adám Ah, I see, thank you.
                                                            $endgroup$
                                                            – Conor O'Brien
                                                            2 days ago


















                                                          • $begingroup$
                                                            Save a byte with e.
                                                            $endgroup$
                                                            – Adám
                                                            2 days ago










                                                          • $begingroup$
                                                            @Adám How so? Shortest approach I got with e. was =+.5 e.|@-,+. Maybe you forget 5e. is an invalid token in J?
                                                            $endgroup$
                                                            – Conor O'Brien
                                                            2 days ago










                                                          • $begingroup$
                                                            Since two integers cannot simultaneously sum to 5 and be equal, you can use + instead of +.
                                                            $endgroup$
                                                            – Adám
                                                            2 days ago










                                                          • $begingroup$
                                                            @Adám Ah, I see, thank you.
                                                            $endgroup$
                                                            – Conor O'Brien
                                                            2 days ago
















                                                          $begingroup$
                                                          Save a byte with e.
                                                          $endgroup$
                                                          – Adám
                                                          2 days ago




                                                          $begingroup$
                                                          Save a byte with e.
                                                          $endgroup$
                                                          – Adám
                                                          2 days ago












                                                          $begingroup$
                                                          @Adám How so? Shortest approach I got with e. was =+.5 e.|@-,+. Maybe you forget 5e. is an invalid token in J?
                                                          $endgroup$
                                                          – Conor O'Brien
                                                          2 days ago




                                                          $begingroup$
                                                          @Adám How so? Shortest approach I got with e. was =+.5 e.|@-,+. Maybe you forget 5e. is an invalid token in J?
                                                          $endgroup$
                                                          – Conor O'Brien
                                                          2 days ago












                                                          $begingroup$
                                                          Since two integers cannot simultaneously sum to 5 and be equal, you can use + instead of +.
                                                          $endgroup$
                                                          – Adám
                                                          2 days ago




                                                          $begingroup$
                                                          Since two integers cannot simultaneously sum to 5 and be equal, you can use + instead of +.
                                                          $endgroup$
                                                          – Adám
                                                          2 days ago












                                                          $begingroup$
                                                          @Adám Ah, I see, thank you.
                                                          $endgroup$
                                                          – Conor O'Brien
                                                          2 days ago




                                                          $begingroup$
                                                          @Adám Ah, I see, thank you.
                                                          $endgroup$
                                                          – Conor O'Brien
                                                          2 days ago











                                                          4












                                                          $begingroup$

                                                          Python 2, 38 bytes



                                                          -2 bytes thanks to @DjMcMayhem





                                                          lambda a,b:a+b==5or abs(a-b)==5or a==b


                                                          Try it online!






                                                          share|improve this answer











                                                          $endgroup$













                                                          • $begingroup$
                                                            Your TIO is actually 42 bytes but you can fix it by deleting the spaces between the 5s and the ors
                                                            $endgroup$
                                                            – ElPedro
                                                            2 days ago








                                                          • 3




                                                            $begingroup$
                                                            Actually, the TIO link could be 38 bytes
                                                            $endgroup$
                                                            – DJMcMayhem
                                                            2 days ago










                                                          • $begingroup$
                                                            @ElPedro the function itself was 40 bytes but I used f= in order to be able to call it
                                                            $endgroup$
                                                            – fəˈnɛtɪk
                                                            2 days ago






                                                          • 1




                                                            $begingroup$
                                                            @DJMcMayhem I don't normally golf in python. I just did it because the question asker used python for their example
                                                            $endgroup$
                                                            – fəˈnɛtɪk
                                                            2 days ago
















                                                          4












                                                          $begingroup$

                                                          Python 2, 38 bytes



                                                          -2 bytes thanks to @DjMcMayhem





                                                          lambda a,b:a+b==5or abs(a-b)==5or a==b


                                                          Try it online!






                                                          share|improve this answer











                                                          $endgroup$













                                                          • $begingroup$
                                                            Your TIO is actually 42 bytes but you can fix it by deleting the spaces between the 5s and the ors
                                                            $endgroup$
                                                            – ElPedro
                                                            2 days ago








                                                          • 3




                                                            $begingroup$
                                                            Actually, the TIO link could be 38 bytes
                                                            $endgroup$
                                                            – DJMcMayhem
                                                            2 days ago










                                                          • $begingroup$
                                                            @ElPedro the function itself was 40 bytes but I used f= in order to be able to call it
                                                            $endgroup$
                                                            – fəˈnɛtɪk
                                                            2 days ago






                                                          • 1




                                                            $begingroup$
                                                            @DJMcMayhem I don't normally golf in python. I just did it because the question asker used python for their example
                                                            $endgroup$
                                                            – fəˈnɛtɪk
                                                            2 days ago














                                                          4












                                                          4








                                                          4





                                                          $begingroup$

                                                          Python 2, 38 bytes



                                                          -2 bytes thanks to @DjMcMayhem





                                                          lambda a,b:a+b==5or abs(a-b)==5or a==b


                                                          Try it online!






                                                          share|improve this answer











                                                          $endgroup$



                                                          Python 2, 38 bytes



                                                          -2 bytes thanks to @DjMcMayhem





                                                          lambda a,b:a+b==5or abs(a-b)==5or a==b


                                                          Try it online!







                                                          share|improve this answer














                                                          share|improve this answer



                                                          share|improve this answer








                                                          edited 2 days ago

























                                                          answered 2 days ago









                                                          fəˈnɛtɪkfəˈnɛtɪk

                                                          3,6531637




                                                          3,6531637












                                                          • $begingroup$
                                                            Your TIO is actually 42 bytes but you can fix it by deleting the spaces between the 5s and the ors
                                                            $endgroup$
                                                            – ElPedro
                                                            2 days ago








                                                          • 3




                                                            $begingroup$
                                                            Actually, the TIO link could be 38 bytes
                                                            $endgroup$
                                                            – DJMcMayhem
                                                            2 days ago










                                                          • $begingroup$
                                                            @ElPedro the function itself was 40 bytes but I used f= in order to be able to call it
                                                            $endgroup$
                                                            – fəˈnɛtɪk
                                                            2 days ago






                                                          • 1




                                                            $begingroup$
                                                            @DJMcMayhem I don't normally golf in python. I just did it because the question asker used python for their example
                                                            $endgroup$
                                                            – fəˈnɛtɪk
                                                            2 days ago


















                                                          • $begingroup$
                                                            Your TIO is actually 42 bytes but you can fix it by deleting the spaces between the 5s and the ors
                                                            $endgroup$
                                                            – ElPedro
                                                            2 days ago








                                                          • 3




                                                            $begingroup$
                                                            Actually, the TIO link could be 38 bytes
                                                            $endgroup$
                                                            – DJMcMayhem
                                                            2 days ago










                                                          • $begingroup$
                                                            @ElPedro the function itself was 40 bytes but I used f= in order to be able to call it
                                                            $endgroup$
                                                            – fəˈnɛtɪk
                                                            2 days ago






                                                          • 1




                                                            $begingroup$
                                                            @DJMcMayhem I don't normally golf in python. I just did it because the question asker used python for their example
                                                            $endgroup$
                                                            – fəˈnɛtɪk
                                                            2 days ago
















                                                          $begingroup$
                                                          Your TIO is actually 42 bytes but you can fix it by deleting the spaces between the 5s and the ors
                                                          $endgroup$
                                                          – ElPedro
                                                          2 days ago






                                                          $begingroup$
                                                          Your TIO is actually 42 bytes but you can fix it by deleting the spaces between the 5s and the ors
                                                          $endgroup$
                                                          – ElPedro
                                                          2 days ago






                                                          3




                                                          3




                                                          $begingroup$
                                                          Actually, the TIO link could be 38 bytes
                                                          $endgroup$
                                                          – DJMcMayhem
                                                          2 days ago




                                                          $begingroup$
                                                          Actually, the TIO link could be 38 bytes
                                                          $endgroup$
                                                          – DJMcMayhem
                                                          2 days ago












                                                          $begingroup$
                                                          @ElPedro the function itself was 40 bytes but I used f= in order to be able to call it
                                                          $endgroup$
                                                          – fəˈnɛtɪk
                                                          2 days ago




                                                          $begingroup$
                                                          @ElPedro the function itself was 40 bytes but I used f= in order to be able to call it
                                                          $endgroup$
                                                          – fəˈnɛtɪk
                                                          2 days ago




                                                          1




                                                          1




                                                          $begingroup$
                                                          @DJMcMayhem I don't normally golf in python. I just did it because the question asker used python for their example
                                                          $endgroup$
                                                          – fəˈnɛtɪk
                                                          2 days ago




                                                          $begingroup$
                                                          @DJMcMayhem I don't normally golf in python. I just did it because the question asker used python for their example
                                                          $endgroup$
                                                          – fəˈnɛtɪk
                                                          2 days ago











                                                          4












                                                          $begingroup$


                                                          Java (JDK), 30 bytes





                                                          a->b->a+b==5|a==b|(b-=a)*b==25


                                                          Try it online!






                                                          share|improve this answer









                                                          $endgroup$


















                                                            4












                                                            $begingroup$


                                                            Java (JDK), 30 bytes





                                                            a->b->a+b==5|a==b|(b-=a)*b==25


                                                            Try it online!






                                                            share|improve this answer









                                                            $endgroup$
















                                                              4












                                                              4








                                                              4





                                                              $begingroup$


                                                              Java (JDK), 30 bytes





                                                              a->b->a+b==5|a==b|(b-=a)*b==25


                                                              Try it online!






                                                              share|improve this answer









                                                              $endgroup$




                                                              Java (JDK), 30 bytes





                                                              a->b->a+b==5|a==b|(b-=a)*b==25


                                                              Try it online!







                                                              share|improve this answer












                                                              share|improve this answer



                                                              share|improve this answer










                                                              answered 2 days ago









                                                              Olivier GrégoireOlivier Grégoire

                                                              8,92511843




                                                              8,92511843























                                                                  4












                                                                  $begingroup$


                                                                  Wolfram Language (Mathematica), 22 bytes



                                                                  Takes input as [a][b].



                                                                  MatchQ[#|5-#|#-5|#+5]&


                                                                  Try it online!






                                                                  share|improve this answer











                                                                  $endgroup$


















                                                                    4












                                                                    $begingroup$


                                                                    Wolfram Language (Mathematica), 22 bytes



                                                                    Takes input as [a][b].



                                                                    MatchQ[#|5-#|#-5|#+5]&


                                                                    Try it online!






                                                                    share|improve this answer











                                                                    $endgroup$
















                                                                      4












                                                                      4








                                                                      4





                                                                      $begingroup$


                                                                      Wolfram Language (Mathematica), 22 bytes



                                                                      Takes input as [a][b].



                                                                      MatchQ[#|5-#|#-5|#+5]&


                                                                      Try it online!






                                                                      share|improve this answer











                                                                      $endgroup$




                                                                      Wolfram Language (Mathematica), 22 bytes



                                                                      Takes input as [a][b].



                                                                      MatchQ[#|5-#|#-5|#+5]&


                                                                      Try it online!







                                                                      share|improve this answer














                                                                      share|improve this answer



                                                                      share|improve this answer








                                                                      edited 2 days ago

























                                                                      answered 2 days ago









                                                                      alephalphaalephalpha

                                                                      21.2k32991




                                                                      21.2k32991























                                                                          4












                                                                          $begingroup$


                                                                          Python 2, 29 31 bytes





                                                                          lambda a,b:a+b==5or`a-b`in"0-5"


                                                                          Try it online!



                                                                          Since I didn't manage to read the task carefully the first time, in order to fix it, I had to come up with a completely different approach, which is unfortunately not as concise.






                                                                          share|improve this answer











                                                                          $endgroup$


















                                                                            4












                                                                            $begingroup$


                                                                            Python 2, 29 31 bytes





                                                                            lambda a,b:a+b==5or`a-b`in"0-5"


                                                                            Try it online!



                                                                            Since I didn't manage to read the task carefully the first time, in order to fix it, I had to come up with a completely different approach, which is unfortunately not as concise.






                                                                            share|improve this answer











                                                                            $endgroup$
















                                                                              4












                                                                              4








                                                                              4





                                                                              $begingroup$


                                                                              Python 2, 29 31 bytes





                                                                              lambda a,b:a+b==5or`a-b`in"0-5"


                                                                              Try it online!



                                                                              Since I didn't manage to read the task carefully the first time, in order to fix it, I had to come up with a completely different approach, which is unfortunately not as concise.






                                                                              share|improve this answer











                                                                              $endgroup$




                                                                              Python 2, 29 31 bytes





                                                                              lambda a,b:a+b==5or`a-b`in"0-5"


                                                                              Try it online!



                                                                              Since I didn't manage to read the task carefully the first time, in order to fix it, I had to come up with a completely different approach, which is unfortunately not as concise.







                                                                              share|improve this answer














                                                                              share|improve this answer



                                                                              share|improve this answer








                                                                              edited yesterday

























                                                                              answered 2 days ago









                                                                              Kirill L.Kirill L.

                                                                              3,8051319




                                                                              3,8051319























                                                                                  4












                                                                                  $begingroup$


                                                                                  PowerShell, 48 44 40 bytes





                                                                                  param($a,$b)$b-in($a-5),(5-$a),(5+$a),$a


                                                                                  Try it online! or Verify all Test Cases



                                                                                  Takes input $a and $b. Checks if $b is -in the group ($a-5, 5-$a 5+$a, or $a), which checks all possible combinations of $a,$b, and 5.



                                                                                  -4 bytes thanks to mazzy.
                                                                                  -4 bytes thanks to KGlasier.






                                                                                  share|improve this answer











                                                                                  $endgroup$













                                                                                  • $begingroup$
                                                                                    ($a-$b) is -$x :)
                                                                                    $endgroup$
                                                                                    – mazzy
                                                                                    2 days ago










                                                                                  • $begingroup$
                                                                                    @mazzy Ooo, good call.
                                                                                    $endgroup$
                                                                                    – AdmBorkBork
                                                                                    2 days ago










                                                                                  • $begingroup$
                                                                                    If you switch 5 and $b around you can cut off a couple bytes(ie param($a,$b)$b-in($a-5),(5-$a),($a+5),$a) Try it out here
                                                                                    $endgroup$
                                                                                    – KGlasier
                                                                                    yesterday






                                                                                  • 1




                                                                                    $begingroup$
                                                                                    @KGlasier Excellent suggestion. I needed to swap $a+5 to 5+$a to get it to cast appropriately when taking command-line input, but otherwise awesome. Thanks!
                                                                                    $endgroup$
                                                                                    – AdmBorkBork
                                                                                    yesterday
















                                                                                  4












                                                                                  $begingroup$


                                                                                  PowerShell, 48 44 40 bytes





                                                                                  param($a,$b)$b-in($a-5),(5-$a),(5+$a),$a


                                                                                  Try it online! or Verify all Test Cases



                                                                                  Takes input $a and $b. Checks if $b is -in the group ($a-5, 5-$a 5+$a, or $a), which checks all possible combinations of $a,$b, and 5.



                                                                                  -4 bytes thanks to mazzy.
                                                                                  -4 bytes thanks to KGlasier.






                                                                                  share|improve this answer











                                                                                  $endgroup$













                                                                                  • $begingroup$
                                                                                    ($a-$b) is -$x :)
                                                                                    $endgroup$
                                                                                    – mazzy
                                                                                    2 days ago










                                                                                  • $begingroup$
                                                                                    @mazzy Ooo, good call.
                                                                                    $endgroup$
                                                                                    – AdmBorkBork
                                                                                    2 days ago










                                                                                  • $begingroup$
                                                                                    If you switch 5 and $b around you can cut off a couple bytes(ie param($a,$b)$b-in($a-5),(5-$a),($a+5),$a) Try it out here
                                                                                    $endgroup$
                                                                                    – KGlasier
                                                                                    yesterday






                                                                                  • 1




                                                                                    $begingroup$
                                                                                    @KGlasier Excellent suggestion. I needed to swap $a+5 to 5+$a to get it to cast appropriately when taking command-line input, but otherwise awesome. Thanks!
                                                                                    $endgroup$
                                                                                    – AdmBorkBork
                                                                                    yesterday














                                                                                  4












                                                                                  4








                                                                                  4





                                                                                  $begingroup$


                                                                                  PowerShell, 48 44 40 bytes





                                                                                  param($a,$b)$b-in($a-5),(5-$a),(5+$a),$a


                                                                                  Try it online! or Verify all Test Cases



                                                                                  Takes input $a and $b. Checks if $b is -in the group ($a-5, 5-$a 5+$a, or $a), which checks all possible combinations of $a,$b, and 5.



                                                                                  -4 bytes thanks to mazzy.
                                                                                  -4 bytes thanks to KGlasier.






                                                                                  share|improve this answer











                                                                                  $endgroup$




                                                                                  PowerShell, 48 44 40 bytes





                                                                                  param($a,$b)$b-in($a-5),(5-$a),(5+$a),$a


                                                                                  Try it online! or Verify all Test Cases



                                                                                  Takes input $a and $b. Checks if $b is -in the group ($a-5, 5-$a 5+$a, or $a), which checks all possible combinations of $a,$b, and 5.



                                                                                  -4 bytes thanks to mazzy.
                                                                                  -4 bytes thanks to KGlasier.







                                                                                  share|improve this answer














                                                                                  share|improve this answer



                                                                                  share|improve this answer








                                                                                  edited yesterday

























                                                                                  answered 2 days ago









                                                                                  AdmBorkBorkAdmBorkBork

                                                                                  26.6k364229




                                                                                  26.6k364229












                                                                                  • $begingroup$
                                                                                    ($a-$b) is -$x :)
                                                                                    $endgroup$
                                                                                    – mazzy
                                                                                    2 days ago










                                                                                  • $begingroup$
                                                                                    @mazzy Ooo, good call.
                                                                                    $endgroup$
                                                                                    – AdmBorkBork
                                                                                    2 days ago










                                                                                  • $begingroup$
                                                                                    If you switch 5 and $b around you can cut off a couple bytes(ie param($a,$b)$b-in($a-5),(5-$a),($a+5),$a) Try it out here
                                                                                    $endgroup$
                                                                                    – KGlasier
                                                                                    yesterday






                                                                                  • 1




                                                                                    $begingroup$
                                                                                    @KGlasier Excellent suggestion. I needed to swap $a+5 to 5+$a to get it to cast appropriately when taking command-line input, but otherwise awesome. Thanks!
                                                                                    $endgroup$
                                                                                    – AdmBorkBork
                                                                                    yesterday


















                                                                                  • $begingroup$
                                                                                    ($a-$b) is -$x :)
                                                                                    $endgroup$
                                                                                    – mazzy
                                                                                    2 days ago










                                                                                  • $begingroup$
                                                                                    @mazzy Ooo, good call.
                                                                                    $endgroup$
                                                                                    – AdmBorkBork
                                                                                    2 days ago










                                                                                  • $begingroup$
                                                                                    If you switch 5 and $b around you can cut off a couple bytes(ie param($a,$b)$b-in($a-5),(5-$a),($a+5),$a) Try it out here
                                                                                    $endgroup$
                                                                                    – KGlasier
                                                                                    yesterday






                                                                                  • 1




                                                                                    $begingroup$
                                                                                    @KGlasier Excellent suggestion. I needed to swap $a+5 to 5+$a to get it to cast appropriately when taking command-line input, but otherwise awesome. Thanks!
                                                                                    $endgroup$
                                                                                    – AdmBorkBork
                                                                                    yesterday
















                                                                                  $begingroup$
                                                                                  ($a-$b) is -$x :)
                                                                                  $endgroup$
                                                                                  – mazzy
                                                                                  2 days ago




                                                                                  $begingroup$
                                                                                  ($a-$b) is -$x :)
                                                                                  $endgroup$
                                                                                  – mazzy
                                                                                  2 days ago












                                                                                  $begingroup$
                                                                                  @mazzy Ooo, good call.
                                                                                  $endgroup$
                                                                                  – AdmBorkBork
                                                                                  2 days ago




                                                                                  $begingroup$
                                                                                  @mazzy Ooo, good call.
                                                                                  $endgroup$
                                                                                  – AdmBorkBork
                                                                                  2 days ago












                                                                                  $begingroup$
                                                                                  If you switch 5 and $b around you can cut off a couple bytes(ie param($a,$b)$b-in($a-5),(5-$a),($a+5),$a) Try it out here
                                                                                  $endgroup$
                                                                                  – KGlasier
                                                                                  yesterday




                                                                                  $begingroup$
                                                                                  If you switch 5 and $b around you can cut off a couple bytes(ie param($a,$b)$b-in($a-5),(5-$a),($a+5),$a) Try it out here
                                                                                  $endgroup$
                                                                                  – KGlasier
                                                                                  yesterday




                                                                                  1




                                                                                  1




                                                                                  $begingroup$
                                                                                  @KGlasier Excellent suggestion. I needed to swap $a+5 to 5+$a to get it to cast appropriately when taking command-line input, but otherwise awesome. Thanks!
                                                                                  $endgroup$
                                                                                  – AdmBorkBork
                                                                                  yesterday




                                                                                  $begingroup$
                                                                                  @KGlasier Excellent suggestion. I needed to swap $a+5 to 5+$a to get it to cast appropriately when taking command-line input, but otherwise awesome. Thanks!
                                                                                  $endgroup$
                                                                                  – AdmBorkBork
                                                                                  yesterday











                                                                                  4












                                                                                  $begingroup$

                                                                                  8086 machine code, 22 20 bytes



                                                                                  8bd0 2bc3 740e 7902 f7d8 3d0500 7405 03d3 83fa05


                                                                                  Ungolfed:



                                                                                  ESD  MACRO
                                                                                  LOCAL SUB_POS, DONE
                                                                                  MOV DX, AX ; Save AX to DX
                                                                                  SUB AX, BX ; AX = AX - BX
                                                                                  JZ DONE ; if 0, then they are equal, ZF=1
                                                                                  JNS SUB_POS ; if positive, go to SUB_POS
                                                                                  NEG AX ; otherwise negate the result
                                                                                  SUB_POS:
                                                                                  CMP AX, 5 ; if result is 5, ZF=1
                                                                                  JZ DONE
                                                                                  ADD DX, BX ; DX = DX + BX
                                                                                  CMP DX, 5 ; if 5, ZF=1
                                                                                  DONE:
                                                                                  ENDM


                                                                                  Input numbers in AX and BX and returns Zero Flag (ZF=1) if result is true. If desired, you can also determine which condition was true with the following:




                                                                                  • ZF = 1 and DX = 5 ; sum is 5

                                                                                  • ZF = 1 and AX = 5 ; diff is 5

                                                                                  • ZF = 1 and AX = 0 ; equal

                                                                                  • ZF = 0 ; result false


                                                                                  If the difference between the numbers is 0, we know they are equal. Otherwise if result is negative, then first negate it and then check for 5. If still not true, then add and check for 5.



                                                                                  Sample PC DOS test program. Download it here (ESD.COM).



                                                                                  START:
                                                                                  CALL INDEC ; input first number into AX
                                                                                  MOV BX, AX ; move to BX
                                                                                  CALL INDEC ; input second number into BX
                                                                                  ESD ; run "Equal, sum or difference" routine
                                                                                  JZ TRUE ; if ZF=1, result is true
                                                                                  FALSE:
                                                                                  MOV DX, OFFSET FALSY ; load Falsy string
                                                                                  JMP DONE
                                                                                  TRUE:
                                                                                  MOV DX, OFFSET TRUTHY ; load Truthy string
                                                                                  DONE:
                                                                                  MOV AH, 9 ; DOS display string
                                                                                  INT 21H ; execute
                                                                                  MOV AX, 4C00H ; DOS terminate
                                                                                  INT 21H ; execute

                                                                                  TRUTHY DB 'Truthy$'
                                                                                  FALSY DB 'Falsy$'

                                                                                  INCLUDE INDEC.ASM ; generic decimal input prompt routine


                                                                                  Output of test program:



                                                                                  A>ESD.COM
                                                                                  : 4
                                                                                  : 1
                                                                                  Truthy

                                                                                  A>ESD.COM
                                                                                  : 10
                                                                                  : 10
                                                                                  Truthy

                                                                                  A>ESD.COM
                                                                                  : 1
                                                                                  : 3
                                                                                  Falsy

                                                                                  A>ESD.COM
                                                                                  : 6
                                                                                  : 2
                                                                                  Falsy

                                                                                  A>ESD.COM
                                                                                  : 1
                                                                                  : 6
                                                                                  Truthy

                                                                                  A>ESD.COM
                                                                                  : -256
                                                                                  : -251
                                                                                  Truthy

                                                                                  A>ESD.COM
                                                                                  : 6
                                                                                  : 1
                                                                                  Truthy

                                                                                  A>ESD.COM
                                                                                  : 9999999999
                                                                                  : 9999999994
                                                                                  Truthy





                                                                                  share|improve this answer











                                                                                  $endgroup$


















                                                                                    4












                                                                                    $begingroup$

                                                                                    8086 machine code, 22 20 bytes



                                                                                    8bd0 2bc3 740e 7902 f7d8 3d0500 7405 03d3 83fa05


                                                                                    Ungolfed:



                                                                                    ESD  MACRO
                                                                                    LOCAL SUB_POS, DONE
                                                                                    MOV DX, AX ; Save AX to DX
                                                                                    SUB AX, BX ; AX = AX - BX
                                                                                    JZ DONE ; if 0, then they are equal, ZF=1
                                                                                    JNS SUB_POS ; if positive, go to SUB_POS
                                                                                    NEG AX ; otherwise negate the result
                                                                                    SUB_POS:
                                                                                    CMP AX, 5 ; if result is 5, ZF=1
                                                                                    JZ DONE
                                                                                    ADD DX, BX ; DX = DX + BX
                                                                                    CMP DX, 5 ; if 5, ZF=1
                                                                                    DONE:
                                                                                    ENDM


                                                                                    Input numbers in AX and BX and returns Zero Flag (ZF=1) if result is true. If desired, you can also determine which condition was true with the following:




                                                                                    • ZF = 1 and DX = 5 ; sum is 5

                                                                                    • ZF = 1 and AX = 5 ; diff is 5

                                                                                    • ZF = 1 and AX = 0 ; equal

                                                                                    • ZF = 0 ; result false


                                                                                    If the difference between the numbers is 0, we know they are equal. Otherwise if result is negative, then first negate it and then check for 5. If still not true, then add and check for 5.



                                                                                    Sample PC DOS test program. Download it here (ESD.COM).



                                                                                    START:
                                                                                    CALL INDEC ; input first number into AX
                                                                                    MOV BX, AX ; move to BX
                                                                                    CALL INDEC ; input second number into BX
                                                                                    ESD ; run "Equal, sum or difference" routine
                                                                                    JZ TRUE ; if ZF=1, result is true
                                                                                    FALSE:
                                                                                    MOV DX, OFFSET FALSY ; load Falsy string
                                                                                    JMP DONE
                                                                                    TRUE:
                                                                                    MOV DX, OFFSET TRUTHY ; load Truthy string
                                                                                    DONE:
                                                                                    MOV AH, 9 ; DOS display string
                                                                                    INT 21H ; execute
                                                                                    MOV AX, 4C00H ; DOS terminate
                                                                                    INT 21H ; execute

                                                                                    TRUTHY DB 'Truthy$'
                                                                                    FALSY DB 'Falsy$'

                                                                                    INCLUDE INDEC.ASM ; generic decimal input prompt routine


                                                                                    Output of test program:



                                                                                    A>ESD.COM
                                                                                    : 4
                                                                                    : 1
                                                                                    Truthy

                                                                                    A>ESD.COM
                                                                                    : 10
                                                                                    : 10
                                                                                    Truthy

                                                                                    A>ESD.COM
                                                                                    : 1
                                                                                    : 3
                                                                                    Falsy

                                                                                    A>ESD.COM
                                                                                    : 6
                                                                                    : 2
                                                                                    Falsy

                                                                                    A>ESD.COM
                                                                                    : 1
                                                                                    : 6
                                                                                    Truthy

                                                                                    A>ESD.COM
                                                                                    : -256
                                                                                    : -251
                                                                                    Truthy

                                                                                    A>ESD.COM
                                                                                    : 6
                                                                                    : 1
                                                                                    Truthy

                                                                                    A>ESD.COM
                                                                                    : 9999999999
                                                                                    : 9999999994
                                                                                    Truthy





                                                                                    share|improve this answer











                                                                                    $endgroup$
















                                                                                      4












                                                                                      4








                                                                                      4





                                                                                      $begingroup$

                                                                                      8086 machine code, 22 20 bytes



                                                                                      8bd0 2bc3 740e 7902 f7d8 3d0500 7405 03d3 83fa05


                                                                                      Ungolfed:



                                                                                      ESD  MACRO
                                                                                      LOCAL SUB_POS, DONE
                                                                                      MOV DX, AX ; Save AX to DX
                                                                                      SUB AX, BX ; AX = AX - BX
                                                                                      JZ DONE ; if 0, then they are equal, ZF=1
                                                                                      JNS SUB_POS ; if positive, go to SUB_POS
                                                                                      NEG AX ; otherwise negate the result
                                                                                      SUB_POS:
                                                                                      CMP AX, 5 ; if result is 5, ZF=1
                                                                                      JZ DONE
                                                                                      ADD DX, BX ; DX = DX + BX
                                                                                      CMP DX, 5 ; if 5, ZF=1
                                                                                      DONE:
                                                                                      ENDM


                                                                                      Input numbers in AX and BX and returns Zero Flag (ZF=1) if result is true. If desired, you can also determine which condition was true with the following:




                                                                                      • ZF = 1 and DX = 5 ; sum is 5

                                                                                      • ZF = 1 and AX = 5 ; diff is 5

                                                                                      • ZF = 1 and AX = 0 ; equal

                                                                                      • ZF = 0 ; result false


                                                                                      If the difference between the numbers is 0, we know they are equal. Otherwise if result is negative, then first negate it and then check for 5. If still not true, then add and check for 5.



                                                                                      Sample PC DOS test program. Download it here (ESD.COM).



                                                                                      START:
                                                                                      CALL INDEC ; input first number into AX
                                                                                      MOV BX, AX ; move to BX
                                                                                      CALL INDEC ; input second number into BX
                                                                                      ESD ; run "Equal, sum or difference" routine
                                                                                      JZ TRUE ; if ZF=1, result is true
                                                                                      FALSE:
                                                                                      MOV DX, OFFSET FALSY ; load Falsy string
                                                                                      JMP DONE
                                                                                      TRUE:
                                                                                      MOV DX, OFFSET TRUTHY ; load Truthy string
                                                                                      DONE:
                                                                                      MOV AH, 9 ; DOS display string
                                                                                      INT 21H ; execute
                                                                                      MOV AX, 4C00H ; DOS terminate
                                                                                      INT 21H ; execute

                                                                                      TRUTHY DB 'Truthy$'
                                                                                      FALSY DB 'Falsy$'

                                                                                      INCLUDE INDEC.ASM ; generic decimal input prompt routine


                                                                                      Output of test program:



                                                                                      A>ESD.COM
                                                                                      : 4
                                                                                      : 1
                                                                                      Truthy

                                                                                      A>ESD.COM
                                                                                      : 10
                                                                                      : 10
                                                                                      Truthy

                                                                                      A>ESD.COM
                                                                                      : 1
                                                                                      : 3
                                                                                      Falsy

                                                                                      A>ESD.COM
                                                                                      : 6
                                                                                      : 2
                                                                                      Falsy

                                                                                      A>ESD.COM
                                                                                      : 1
                                                                                      : 6
                                                                                      Truthy

                                                                                      A>ESD.COM
                                                                                      : -256
                                                                                      : -251
                                                                                      Truthy

                                                                                      A>ESD.COM
                                                                                      : 6
                                                                                      : 1
                                                                                      Truthy

                                                                                      A>ESD.COM
                                                                                      : 9999999999
                                                                                      : 9999999994
                                                                                      Truthy





                                                                                      share|improve this answer











                                                                                      $endgroup$



                                                                                      8086 machine code, 22 20 bytes



                                                                                      8bd0 2bc3 740e 7902 f7d8 3d0500 7405 03d3 83fa05


                                                                                      Ungolfed:



                                                                                      ESD  MACRO
                                                                                      LOCAL SUB_POS, DONE
                                                                                      MOV DX, AX ; Save AX to DX
                                                                                      SUB AX, BX ; AX = AX - BX
                                                                                      JZ DONE ; if 0, then they are equal, ZF=1
                                                                                      JNS SUB_POS ; if positive, go to SUB_POS
                                                                                      NEG AX ; otherwise negate the result
                                                                                      SUB_POS:
                                                                                      CMP AX, 5 ; if result is 5, ZF=1
                                                                                      JZ DONE
                                                                                      ADD DX, BX ; DX = DX + BX
                                                                                      CMP DX, 5 ; if 5, ZF=1
                                                                                      DONE:
                                                                                      ENDM


                                                                                      Input numbers in AX and BX and returns Zero Flag (ZF=1) if result is true. If desired, you can also determine which condition was true with the following:




                                                                                      • ZF = 1 and DX = 5 ; sum is 5

                                                                                      • ZF = 1 and AX = 5 ; diff is 5

                                                                                      • ZF = 1 and AX = 0 ; equal

                                                                                      • ZF = 0 ; result false


                                                                                      If the difference between the numbers is 0, we know they are equal. Otherwise if result is negative, then first negate it and then check for 5. If still not true, then add and check for 5.



                                                                                      Sample PC DOS test program. Download it here (ESD.COM).



                                                                                      START:
                                                                                      CALL INDEC ; input first number into AX
                                                                                      MOV BX, AX ; move to BX
                                                                                      CALL INDEC ; input second number into BX
                                                                                      ESD ; run "Equal, sum or difference" routine
                                                                                      JZ TRUE ; if ZF=1, result is true
                                                                                      FALSE:
                                                                                      MOV DX, OFFSET FALSY ; load Falsy string
                                                                                      JMP DONE
                                                                                      TRUE:
                                                                                      MOV DX, OFFSET TRUTHY ; load Truthy string
                                                                                      DONE:
                                                                                      MOV AH, 9 ; DOS display string
                                                                                      INT 21H ; execute
                                                                                      MOV AX, 4C00H ; DOS terminate
                                                                                      INT 21H ; execute

                                                                                      TRUTHY DB 'Truthy$'
                                                                                      FALSY DB 'Falsy$'

                                                                                      INCLUDE INDEC.ASM ; generic decimal input prompt routine


                                                                                      Output of test program:



                                                                                      A>ESD.COM
                                                                                      : 4
                                                                                      : 1
                                                                                      Truthy

                                                                                      A>ESD.COM
                                                                                      : 10
                                                                                      : 10
                                                                                      Truthy

                                                                                      A>ESD.COM
                                                                                      : 1
                                                                                      : 3
                                                                                      Falsy

                                                                                      A>ESD.COM
                                                                                      : 6
                                                                                      : 2
                                                                                      Falsy

                                                                                      A>ESD.COM
                                                                                      : 1
                                                                                      : 6
                                                                                      Truthy

                                                                                      A>ESD.COM
                                                                                      : -256
                                                                                      : -251
                                                                                      Truthy

                                                                                      A>ESD.COM
                                                                                      : 6
                                                                                      : 1
                                                                                      Truthy

                                                                                      A>ESD.COM
                                                                                      : 9999999999
                                                                                      : 9999999994
                                                                                      Truthy






                                                                                      share|improve this answer














                                                                                      share|improve this answer



                                                                                      share|improve this answer








                                                                                      edited 11 hours ago

























                                                                                      answered 2 days ago









                                                                                      gwaughgwaugh

                                                                                      43113




                                                                                      43113























                                                                                          3












                                                                                          $begingroup$


                                                                                          C# (.NET Core), 43, 48, 47, 33 bytes



                                                                                          EDIT: Tried to use % and apparently forgot how to %. Thanks to Arnauld for pointing that out!



                                                                                          EDIT2: AdmBorkBork with a -1 byte golf rearranging the parentheses to sit next to the return so no additional space is needed!



                                                                                          EDIT3: Thanks to dana for -14 byte golf for the one-line return shortcut and currying the function (Ty Embodiment of Ignorance for linking to TIO).




                                                                                          C# (.NET Core), 33 bytes





                                                                                          a=>b=>a==b|a+b==5|(a-b)*(a-b)==25


                                                                                          Try it online!






                                                                                          share|improve this answer











                                                                                          $endgroup$













                                                                                          • $begingroup$
                                                                                            Bah. Trying to avoid System.Math. Back to it! Thanks for pointing that out :D
                                                                                            $endgroup$
                                                                                            – Destroigo
                                                                                            2 days ago






                                                                                          • 1




                                                                                            $begingroup$
                                                                                            You can get it down to 33 bytes applying dana's tips
                                                                                            $endgroup$
                                                                                            – Embodiment of Ignorance
                                                                                            2 days ago


















                                                                                          3












                                                                                          $begingroup$


                                                                                          C# (.NET Core), 43, 48, 47, 33 bytes



                                                                                          EDIT: Tried to use % and apparently forgot how to %. Thanks to Arnauld for pointing that out!



                                                                                          EDIT2: AdmBorkBork with a -1 byte golf rearranging the parentheses to sit next to the return so no additional space is needed!



                                                                                          EDIT3: Thanks to dana for -14 byte golf for the one-line return shortcut and currying the function (Ty Embodiment of Ignorance for linking to TIO).




                                                                                          C# (.NET Core), 33 bytes





                                                                                          a=>b=>a==b|a+b==5|(a-b)*(a-b)==25


                                                                                          Try it online!






                                                                                          share|improve this answer











                                                                                          $endgroup$













                                                                                          • $begingroup$
                                                                                            Bah. Trying to avoid System.Math. Back to it! Thanks for pointing that out :D
                                                                                            $endgroup$
                                                                                            – Destroigo
                                                                                            2 days ago






                                                                                          • 1




                                                                                            $begingroup$
                                                                                            You can get it down to 33 bytes applying dana's tips
                                                                                            $endgroup$
                                                                                            – Embodiment of Ignorance
                                                                                            2 days ago
















                                                                                          3












                                                                                          3








                                                                                          3





                                                                                          $begingroup$


                                                                                          C# (.NET Core), 43, 48, 47, 33 bytes



                                                                                          EDIT: Tried to use % and apparently forgot how to %. Thanks to Arnauld for pointing that out!



                                                                                          EDIT2: AdmBorkBork with a -1 byte golf rearranging the parentheses to sit next to the return so no additional space is needed!



                                                                                          EDIT3: Thanks to dana for -14 byte golf for the one-line return shortcut and currying the function (Ty Embodiment of Ignorance for linking to TIO).




                                                                                          C# (.NET Core), 33 bytes





                                                                                          a=>b=>a==b|a+b==5|(a-b)*(a-b)==25


                                                                                          Try it online!






                                                                                          share|improve this answer











                                                                                          $endgroup$




                                                                                          C# (.NET Core), 43, 48, 47, 33 bytes



                                                                                          EDIT: Tried to use % and apparently forgot how to %. Thanks to Arnauld for pointing that out!



                                                                                          EDIT2: AdmBorkBork with a -1 byte golf rearranging the parentheses to sit next to the return so no additional space is needed!



                                                                                          EDIT3: Thanks to dana for -14 byte golf for the one-line return shortcut and currying the function (Ty Embodiment of Ignorance for linking to TIO).




                                                                                          C# (.NET Core), 33 bytes





                                                                                          a=>b=>a==b|a+b==5|(a-b)*(a-b)==25


                                                                                          Try it online!







                                                                                          share|improve this answer














                                                                                          share|improve this answer



                                                                                          share|improve this answer








                                                                                          edited 2 days ago

























                                                                                          answered 2 days ago









                                                                                          DestroigoDestroigo

                                                                                          1815




                                                                                          1815












                                                                                          • $begingroup$
                                                                                            Bah. Trying to avoid System.Math. Back to it! Thanks for pointing that out :D
                                                                                            $endgroup$
                                                                                            – Destroigo
                                                                                            2 days ago






                                                                                          • 1




                                                                                            $begingroup$
                                                                                            You can get it down to 33 bytes applying dana's tips
                                                                                            $endgroup$
                                                                                            – Embodiment of Ignorance
                                                                                            2 days ago




















                                                                                          • $begingroup$
                                                                                            Bah. Trying to avoid System.Math. Back to it! Thanks for pointing that out :D
                                                                                            $endgroup$
                                                                                            – Destroigo
                                                                                            2 days ago






                                                                                          • 1




                                                                                            $begingroup$
                                                                                            You can get it down to 33 bytes applying dana's tips
                                                                                            $endgroup$
                                                                                            – Embodiment of Ignorance
                                                                                            2 days ago


















                                                                                          $begingroup$
                                                                                          Bah. Trying to avoid System.Math. Back to it! Thanks for pointing that out :D
                                                                                          $endgroup$
                                                                                          – Destroigo
                                                                                          2 days ago




                                                                                          $begingroup$
                                                                                          Bah. Trying to avoid System.Math. Back to it! Thanks for pointing that out :D
                                                                                          $endgroup$
                                                                                          – Destroigo
                                                                                          2 days ago




                                                                                          1




                                                                                          1




                                                                                          $begingroup$
                                                                                          You can get it down to 33 bytes applying dana's tips
                                                                                          $endgroup$
                                                                                          – Embodiment of Ignorance
                                                                                          2 days ago






                                                                                          $begingroup$
                                                                                          You can get it down to 33 bytes applying dana's tips
                                                                                          $endgroup$
                                                                                          – Embodiment of Ignorance
                                                                                          2 days ago













                                                                                          3












                                                                                          $begingroup$


                                                                                          C (gcc), 33 bytes





                                                                                          f(a,b){a=!(a+b-5&&(a-=b)/6|a%5);}


                                                                                          Try it online!



                                                                                          Tried an approach I didn't see anyone else try using. The return expression is equivalent to a+b==5||((-6<a-b||a-b<6)&&(a-b)%5==0).









                                                                                          share|improve this answer









                                                                                          $endgroup$


















                                                                                            3












                                                                                            $begingroup$


                                                                                            C (gcc), 33 bytes





                                                                                            f(a,b){a=!(a+b-5&&(a-=b)/6|a%5);}


                                                                                            Try it online!



                                                                                            Tried an approach I didn't see anyone else try using. The return expression is equivalent to a+b==5||((-6<a-b||a-b<6)&&(a-b)%5==0).









                                                                                            share|improve this answer









                                                                                            $endgroup$
















                                                                                              3












                                                                                              3








                                                                                              3





                                                                                              $begingroup$


                                                                                              C (gcc), 33 bytes





                                                                                              f(a,b){a=!(a+b-5&&(a-=b)/6|a%5);}


                                                                                              Try it online!



                                                                                              Tried an approach I didn't see anyone else try using. The return expression is equivalent to a+b==5||((-6<a-b||a-b<6)&&(a-b)%5==0).









                                                                                              share|improve this answer









                                                                                              $endgroup$




                                                                                              C (gcc), 33 bytes





                                                                                              f(a,b){a=!(a+b-5&&(a-=b)/6|a%5);}


                                                                                              Try it online!



                                                                                              Tried an approach I didn't see anyone else try using. The return expression is equivalent to a+b==5||((-6<a-b||a-b<6)&&(a-b)%5==0).










                                                                                              share|improve this answer












                                                                                              share|improve this answer



                                                                                              share|improve this answer










                                                                                              answered 2 days ago









                                                                                              attinatattinat

                                                                                              3305




                                                                                              3305























                                                                                                  3












                                                                                                  $begingroup$

                                                                                                  Scala, 43 bytes





                                                                                                  def f(a:Int,b:Int)=a+b==5|(a-b).abs==5|a==b


                                                                                                  Try it online!






                                                                                                  share|improve this answer











                                                                                                  $endgroup$













                                                                                                  • $begingroup$
                                                                                                    Isn't it possible to golf the || to |? I know it's possible in Java, C#, Python, or JavaScript, but not sure about Scala.
                                                                                                    $endgroup$
                                                                                                    – Kevin Cruijssen
                                                                                                    yesterday










                                                                                                  • $begingroup$
                                                                                                    Actually yes! thanks
                                                                                                    $endgroup$
                                                                                                    – Xavier Guihot
                                                                                                    yesterday
















                                                                                                  3












                                                                                                  $begingroup$

                                                                                                  Scala, 43 bytes





                                                                                                  def f(a:Int,b:Int)=a+b==5|(a-b).abs==5|a==b


                                                                                                  Try it online!






                                                                                                  share|improve this answer











                                                                                                  $endgroup$













                                                                                                  • $begingroup$
                                                                                                    Isn't it possible to golf the || to |? I know it's possible in Java, C#, Python, or JavaScript, but not sure about Scala.
                                                                                                    $endgroup$
                                                                                                    – Kevin Cruijssen
                                                                                                    yesterday










                                                                                                  • $begingroup$
                                                                                                    Actually yes! thanks
                                                                                                    $endgroup$
                                                                                                    – Xavier Guihot
                                                                                                    yesterday














                                                                                                  3












                                                                                                  3








                                                                                                  3





                                                                                                  $begingroup$

                                                                                                  Scala, 43 bytes





                                                                                                  def f(a:Int,b:Int)=a+b==5|(a-b).abs==5|a==b


                                                                                                  Try it online!






                                                                                                  share|improve this answer











                                                                                                  $endgroup$



                                                                                                  Scala, 43 bytes





                                                                                                  def f(a:Int,b:Int)=a+b==5|(a-b).abs==5|a==b


                                                                                                  Try it online!







                                                                                                  share|improve this answer














                                                                                                  share|improve this answer



                                                                                                  share|improve this answer








                                                                                                  edited yesterday

























                                                                                                  answered 2 days ago









                                                                                                  Xavier GuihotXavier Guihot

                                                                                                  2237




                                                                                                  2237












                                                                                                  • $begingroup$
                                                                                                    Isn't it possible to golf the || to |? I know it's possible in Java, C#, Python, or JavaScript, but not sure about Scala.
                                                                                                    $endgroup$
                                                                                                    – Kevin Cruijssen
                                                                                                    yesterday










                                                                                                  • $begingroup$
                                                                                                    Actually yes! thanks
                                                                                                    $endgroup$
                                                                                                    – Xavier Guihot
                                                                                                    yesterday


















                                                                                                  • $begingroup$
                                                                                                    Isn't it possible to golf the || to |? I know it's possible in Java, C#, Python, or JavaScript, but not sure about Scala.
                                                                                                    $endgroup$
                                                                                                    – Kevin Cruijssen
                                                                                                    yesterday










                                                                                                  • $begingroup$
                                                                                                    Actually yes! thanks
                                                                                                    $endgroup$
                                                                                                    – Xavier Guihot
                                                                                                    yesterday
















                                                                                                  $begingroup$
                                                                                                  Isn't it possible to golf the || to |? I know it's possible in Java, C#, Python, or JavaScript, but not sure about Scala.
                                                                                                  $endgroup$
                                                                                                  – Kevin Cruijssen
                                                                                                  yesterday




                                                                                                  $begingroup$
                                                                                                  Isn't it possible to golf the || to |? I know it's possible in Java, C#, Python, or JavaScript, but not sure about Scala.
                                                                                                  $endgroup$
                                                                                                  – Kevin Cruijssen
                                                                                                  yesterday












                                                                                                  $begingroup$
                                                                                                  Actually yes! thanks
                                                                                                  $endgroup$
                                                                                                  – Xavier Guihot
                                                                                                  yesterday




                                                                                                  $begingroup$
                                                                                                  Actually yes! thanks
                                                                                                  $endgroup$
                                                                                                  – Xavier Guihot
                                                                                                  yesterday











                                                                                                  3












                                                                                                  $begingroup$


                                                                                                  Perl 6, 24 bytes



                                                                                                  -1 byte thanks to Grimy





                                                                                                  {$^a-$^b==5|0|-5|5-2*$b}


                                                                                                  Try it online!



                                                                                                  This uses the Any Junction but technically, ^ could work as well.



                                                                                                  Explanation:



                                                                                                  {                      }  # Anonymous code block
                                                                                                  $^a-$^b== # Is the difference equal to
                                                                                                  | | | # Any of
                                                                                                  0
                                                                                                  5
                                                                                                  -5
                                                                                                  5-2*$b





                                                                                                  share|improve this answer











                                                                                                  $endgroup$









                                                                                                  • 1




                                                                                                    $begingroup$
                                                                                                    -1 byte with {$^a-$^b==5|0|-5|5-2*$b}
                                                                                                    $endgroup$
                                                                                                    – Grimy
                                                                                                    yesterday
















                                                                                                  3












                                                                                                  $begingroup$


                                                                                                  Perl 6, 24 bytes



                                                                                                  -1 byte thanks to Grimy





                                                                                                  {$^a-$^b==5|0|-5|5-2*$b}


                                                                                                  Try it online!



                                                                                                  This uses the Any Junction but technically, ^ could work as well.



                                                                                                  Explanation:



                                                                                                  {                      }  # Anonymous code block
                                                                                                  $^a-$^b== # Is the difference equal to
                                                                                                  | | | # Any of
                                                                                                  0
                                                                                                  5
                                                                                                  -5
                                                                                                  5-2*$b





                                                                                                  share|improve this answer











                                                                                                  $endgroup$









                                                                                                  • 1




                                                                                                    $begingroup$
                                                                                                    -1 byte with {$^a-$^b==5|0|-5|5-2*$b}
                                                                                                    $endgroup$
                                                                                                    – Grimy
                                                                                                    yesterday














                                                                                                  3












                                                                                                  3








                                                                                                  3





                                                                                                  $begingroup$


                                                                                                  Perl 6, 24 bytes



                                                                                                  -1 byte thanks to Grimy





                                                                                                  {$^a-$^b==5|0|-5|5-2*$b}


                                                                                                  Try it online!



                                                                                                  This uses the Any Junction but technically, ^ could work as well.



                                                                                                  Explanation:



                                                                                                  {                      }  # Anonymous code block
                                                                                                  $^a-$^b== # Is the difference equal to
                                                                                                  | | | # Any of
                                                                                                  0
                                                                                                  5
                                                                                                  -5
                                                                                                  5-2*$b





                                                                                                  share|improve this answer











                                                                                                  $endgroup$




                                                                                                  Perl 6, 24 bytes



                                                                                                  -1 byte thanks to Grimy





                                                                                                  {$^a-$^b==5|0|-5|5-2*$b}


                                                                                                  Try it online!



                                                                                                  This uses the Any Junction but technically, ^ could work as well.



                                                                                                  Explanation:



                                                                                                  {                      }  # Anonymous code block
                                                                                                  $^a-$^b== # Is the difference equal to
                                                                                                  | | | # Any of
                                                                                                  0
                                                                                                  5
                                                                                                  -5
                                                                                                  5-2*$b






                                                                                                  share|improve this answer














                                                                                                  share|improve this answer



                                                                                                  share|improve this answer








                                                                                                  edited yesterday

























                                                                                                  answered 2 days ago









                                                                                                  Jo KingJo King

                                                                                                  21.4k248110




                                                                                                  21.4k248110








                                                                                                  • 1




                                                                                                    $begingroup$
                                                                                                    -1 byte with {$^a-$^b==5|0|-5|5-2*$b}
                                                                                                    $endgroup$
                                                                                                    – Grimy
                                                                                                    yesterday














                                                                                                  • 1




                                                                                                    $begingroup$
                                                                                                    -1 byte with {$^a-$^b==5|0|-5|5-2*$b}
                                                                                                    $endgroup$
                                                                                                    – Grimy
                                                                                                    yesterday








                                                                                                  1




                                                                                                  1




                                                                                                  $begingroup$
                                                                                                  -1 byte with {$^a-$^b==5|0|-5|5-2*$b}
                                                                                                  $endgroup$
                                                                                                  – Grimy
                                                                                                  yesterday




                                                                                                  $begingroup$
                                                                                                  -1 byte with {$^a-$^b==5|0|-5|5-2*$b}
                                                                                                  $endgroup$
                                                                                                  – Grimy
                                                                                                  yesterday











                                                                                                  2












                                                                                                  $begingroup$


                                                                                                  C (gcc), 41 34 bytes





                                                                                                  f(a,b){a=5==abs(a-b)|a+b==5|a==b;}


                                                                                                  Try it online!






                                                                                                  share|improve this answer











                                                                                                  $endgroup$









                                                                                                  • 1




                                                                                                    $begingroup$
                                                                                                    Why does f return a? Just some Undefined Behavior?
                                                                                                    $endgroup$
                                                                                                    – Tyilo
                                                                                                    2 days ago










                                                                                                  • $begingroup$
                                                                                                    @Tyilo Yes, it's implementation specific. So happens the first parameter is stored in the same register as the return value.
                                                                                                    $endgroup$
                                                                                                    – cleblanc
                                                                                                    2 days ago










                                                                                                  • $begingroup$
                                                                                                    30 bytes Try it online!
                                                                                                    $endgroup$
                                                                                                    – Logern
                                                                                                    2 days ago










                                                                                                  • $begingroup$
                                                                                                    @Logern Doesn't work for f(6,1)
                                                                                                    $endgroup$
                                                                                                    – cleblanc
                                                                                                    2 days ago










                                                                                                  • $begingroup$
                                                                                                    @ceilingcat Doesn't work for f(6,1)
                                                                                                    $endgroup$
                                                                                                    – cleblanc
                                                                                                    2 days ago
















                                                                                                  2












                                                                                                  $begingroup$


                                                                                                  C (gcc), 41 34 bytes





                                                                                                  f(a,b){a=5==abs(a-b)|a+b==5|a==b;}


                                                                                                  Try it online!






                                                                                                  share|improve this answer











                                                                                                  $endgroup$









                                                                                                  • 1




                                                                                                    $begingroup$
                                                                                                    Why does f return a? Just some Undefined Behavior?
                                                                                                    $endgroup$
                                                                                                    – Tyilo
                                                                                                    2 days ago










                                                                                                  • $begingroup$
                                                                                                    @Tyilo Yes, it's implementation specific. So happens the first parameter is stored in the same register as the return value.
                                                                                                    $endgroup$
                                                                                                    – cleblanc
                                                                                                    2 days ago










                                                                                                  • $begingroup$
                                                                                                    30 bytes Try it online!
                                                                                                    $endgroup$
                                                                                                    – Logern
                                                                                                    2 days ago










                                                                                                  • $begingroup$
                                                                                                    @Logern Doesn't work for f(6,1)
                                                                                                    $endgroup$
                                                                                                    – cleblanc
                                                                                                    2 days ago










                                                                                                  • $begingroup$
                                                                                                    @ceilingcat Doesn't work for f(6,1)
                                                                                                    $endgroup$
                                                                                                    – cleblanc
                                                                                                    2 days ago














                                                                                                  2












                                                                                                  2








                                                                                                  2





                                                                                                  $begingroup$


                                                                                                  C (gcc), 41 34 bytes





                                                                                                  f(a,b){a=5==abs(a-b)|a+b==5|a==b;}


                                                                                                  Try it online!






                                                                                                  share|improve this answer











                                                                                                  $endgroup$




                                                                                                  C (gcc), 41 34 bytes





                                                                                                  f(a,b){a=5==abs(a-b)|a+b==5|a==b;}


                                                                                                  Try it online!







                                                                                                  share|improve this answer














                                                                                                  share|improve this answer



                                                                                                  share|improve this answer








                                                                                                  edited 2 days ago

























                                                                                                  answered 2 days ago









                                                                                                  cleblanccleblanc

                                                                                                  3,200316




                                                                                                  3,200316








                                                                                                  • 1




                                                                                                    $begingroup$
                                                                                                    Why does f return a? Just some Undefined Behavior?
                                                                                                    $endgroup$
                                                                                                    – Tyilo
                                                                                                    2 days ago










                                                                                                  • $begingroup$
                                                                                                    @Tyilo Yes, it's implementation specific. So happens the first parameter is stored in the same register as the return value.
                                                                                                    $endgroup$
                                                                                                    – cleblanc
                                                                                                    2 days ago










                                                                                                  • $begingroup$
                                                                                                    30 bytes Try it online!
                                                                                                    $endgroup$
                                                                                                    – Logern
                                                                                                    2 days ago










                                                                                                  • $begingroup$
                                                                                                    @Logern Doesn't work for f(6,1)
                                                                                                    $endgroup$
                                                                                                    – cleblanc
                                                                                                    2 days ago










                                                                                                  • $begingroup$
                                                                                                    @ceilingcat Doesn't work for f(6,1)
                                                                                                    $endgroup$
                                                                                                    – cleblanc
                                                                                                    2 days ago














                                                                                                  • 1




                                                                                                    $begingroup$
                                                                                                    Why does f return a? Just some Undefined Behavior?
                                                                                                    $endgroup$
                                                                                                    – Tyilo
                                                                                                    2 days ago










                                                                                                  • $begingroup$
                                                                                                    @Tyilo Yes, it's implementation specific. So happens the first parameter is stored in the same register as the return value.
                                                                                                    $endgroup$
                                                                                                    – cleblanc
                                                                                                    2 days ago










                                                                                                  • $begingroup$
                                                                                                    30 bytes Try it online!
                                                                                                    $endgroup$
                                                                                                    – Logern
                                                                                                    2 days ago










                                                                                                  • $begingroup$
                                                                                                    @Logern Doesn't work for f(6,1)
                                                                                                    $endgroup$
                                                                                                    – cleblanc
                                                                                                    2 days ago










                                                                                                  • $begingroup$
                                                                                                    @ceilingcat Doesn't work for f(6,1)
                                                                                                    $endgroup$
                                                                                                    – cleblanc
                                                                                                    2 days ago








                                                                                                  1




                                                                                                  1




                                                                                                  $begingroup$
                                                                                                  Why does f return a? Just some Undefined Behavior?
                                                                                                  $endgroup$
                                                                                                  – Tyilo
                                                                                                  2 days ago




                                                                                                  $begingroup$
                                                                                                  Why does f return a? Just some Undefined Behavior?
                                                                                                  $endgroup$
                                                                                                  – Tyilo
                                                                                                  2 days ago












                                                                                                  $begingroup$
                                                                                                  @Tyilo Yes, it's implementation specific. So happens the first parameter is stored in the same register as the return value.
                                                                                                  $endgroup$
                                                                                                  – cleblanc
                                                                                                  2 days ago




                                                                                                  $begingroup$
                                                                                                  @Tyilo Yes, it's implementation specific. So happens the first parameter is stored in the same register as the return value.
                                                                                                  $endgroup$
                                                                                                  – cleblanc
                                                                                                  2 days ago












                                                                                                  $begingroup$
                                                                                                  30 bytes Try it online!
                                                                                                  $endgroup$
                                                                                                  – Logern
                                                                                                  2 days ago




                                                                                                  $begingroup$
                                                                                                  30 bytes Try it online!
                                                                                                  $endgroup$
                                                                                                  – Logern
                                                                                                  2 days ago












                                                                                                  $begingroup$
                                                                                                  @Logern Doesn't work for f(6,1)
                                                                                                  $endgroup$
                                                                                                  – cleblanc
                                                                                                  2 days ago




                                                                                                  $begingroup$
                                                                                                  @Logern Doesn't work for f(6,1)
                                                                                                  $endgroup$
                                                                                                  – cleblanc
                                                                                                  2 days ago












                                                                                                  $begingroup$
                                                                                                  @ceilingcat Doesn't work for f(6,1)
                                                                                                  $endgroup$
                                                                                                  – cleblanc
                                                                                                  2 days ago




                                                                                                  $begingroup$
                                                                                                  @ceilingcat Doesn't work for f(6,1)
                                                                                                  $endgroup$
                                                                                                  – cleblanc
                                                                                                  2 days ago











                                                                                                  1












                                                                                                  $begingroup$


                                                                                                  Tcl, 53 bytes



                                                                                                  proc P a b {expr abs($a-$b)==5|$a==$b|abs($a+$b)==5}


                                                                                                  Try it online!






                                                                                                  share|improve this answer











                                                                                                  $endgroup$


















                                                                                                    1












                                                                                                    $begingroup$


                                                                                                    Tcl, 53 bytes



                                                                                                    proc P a b {expr abs($a-$b)==5|$a==$b|abs($a+$b)==5}


                                                                                                    Try it online!






                                                                                                    share|improve this answer











                                                                                                    $endgroup$
















                                                                                                      1












                                                                                                      1








                                                                                                      1





                                                                                                      $begingroup$


                                                                                                      Tcl, 53 bytes



                                                                                                      proc P a b {expr abs($a-$b)==5|$a==$b|abs($a+$b)==5}


                                                                                                      Try it online!






                                                                                                      share|improve this answer











                                                                                                      $endgroup$




                                                                                                      Tcl, 53 bytes



                                                                                                      proc P a b {expr abs($a-$b)==5|$a==$b|abs($a+$b)==5}


                                                                                                      Try it online!







                                                                                                      share|improve this answer














                                                                                                      share|improve this answer



                                                                                                      share|improve this answer








                                                                                                      edited 2 days ago

























                                                                                                      answered 2 days ago









                                                                                                      sergiolsergiol

                                                                                                      2,5271925




                                                                                                      2,5271925























                                                                                                          1












                                                                                                          $begingroup$


                                                                                                          Japt, 14 13 bytes



                                                                                                          ¥VªaU ¥5ª5¥Nx


                                                                                                          Try it online!






                                                                                                          share|improve this answer











                                                                                                          $endgroup$


















                                                                                                            1












                                                                                                            $begingroup$


                                                                                                            Japt, 14 13 bytes



                                                                                                            ¥VªaU ¥5ª5¥Nx


                                                                                                            Try it online!






                                                                                                            share|improve this answer











                                                                                                            $endgroup$
















                                                                                                              1












                                                                                                              1








                                                                                                              1





                                                                                                              $begingroup$


                                                                                                              Japt, 14 13 bytes



                                                                                                              ¥VªaU ¥5ª5¥Nx


                                                                                                              Try it online!






                                                                                                              share|improve this answer











                                                                                                              $endgroup$




                                                                                                              Japt, 14 13 bytes



                                                                                                              ¥VªaU ¥5ª5¥Nx


                                                                                                              Try it online!







                                                                                                              share|improve this answer














                                                                                                              share|improve this answer



                                                                                                              share|improve this answer








                                                                                                              edited 2 days ago

























                                                                                                              answered 2 days ago









                                                                                                              OliverOliver

                                                                                                              4,7701831




                                                                                                              4,7701831























                                                                                                                  1












                                                                                                                  $begingroup$


                                                                                                                  05AB1E, 13 12 bytes



                                                                                                                  ÐO5Qs`α5QrËO


                                                                                                                  Try it online!



                                                                                                                  Takes input as a list of integers, saving one byte. Thanks @Wisław!



                                                                                                                  Alternate 12 byte answer



                                                                                                                  Q¹²α5Q¹²+5QO


                                                                                                                  Try it online!



                                                                                                                  This one takes input on separate lines.






                                                                                                                  share|improve this answer











                                                                                                                  $endgroup$









                                                                                                                  • 1




                                                                                                                    $begingroup$
                                                                                                                    Since it is not very clearly specified, can you not assume the input is a list of integers, thus eliminating the initial |?
                                                                                                                    $endgroup$
                                                                                                                    – Wisław
                                                                                                                    2 days ago










                                                                                                                  • $begingroup$
                                                                                                                    @Wisław Good point, I updated my answer. Thanks!
                                                                                                                    $endgroup$
                                                                                                                    – Cowabunghole
                                                                                                                    2 days ago










                                                                                                                  • $begingroup$
                                                                                                                    I found a 11 bytes alternative: OI`αª5¢IË~Ā. Input is a list of integers.
                                                                                                                    $endgroup$
                                                                                                                    – Wisław
                                                                                                                    2 days ago








                                                                                                                  • 1




                                                                                                                    $begingroup$
                                                                                                                    OIÆÄ)5QIËM is 10.
                                                                                                                    $endgroup$
                                                                                                                    – Magic Octopus Urn
                                                                                                                    2 days ago






                                                                                                                  • 1




                                                                                                                    $begingroup$
                                                                                                                    @MagicOctopusUrn I'm not sure exactly what the rules are but I think your solution is different enough from mine to submit your own answer, no? Also, unrelated but I've seen your username on this site for a long time but only after typing it out did I realize that it's "Urn", not "Um" :)
                                                                                                                    $endgroup$
                                                                                                                    – Cowabunghole
                                                                                                                    2 days ago
















                                                                                                                  1












                                                                                                                  $begingroup$


                                                                                                                  05AB1E, 13 12 bytes



                                                                                                                  ÐO5Qs`α5QrËO


                                                                                                                  Try it online!



                                                                                                                  Takes input as a list of integers, saving one byte. Thanks @Wisław!



                                                                                                                  Alternate 12 byte answer



                                                                                                                  Q¹²α5Q¹²+5QO


                                                                                                                  Try it online!



                                                                                                                  This one takes input on separate lines.






                                                                                                                  share|improve this answer











                                                                                                                  $endgroup$









                                                                                                                  • 1




                                                                                                                    $begingroup$
                                                                                                                    Since it is not very clearly specified, can you not assume the input is a list of integers, thus eliminating the initial |?
                                                                                                                    $endgroup$
                                                                                                                    – Wisław
                                                                                                                    2 days ago










                                                                                                                  • $begingroup$
                                                                                                                    @Wisław Good point, I updated my answer. Thanks!
                                                                                                                    $endgroup$
                                                                                                                    – Cowabunghole
                                                                                                                    2 days ago










                                                                                                                  • $begingroup$
                                                                                                                    I found a 11 bytes alternative: OI`αª5¢IË~Ā. Input is a list of integers.
                                                                                                                    $endgroup$
                                                                                                                    – Wisław
                                                                                                                    2 days ago








                                                                                                                  • 1




                                                                                                                    $begingroup$
                                                                                                                    OIÆÄ)5QIËM is 10.
                                                                                                                    $endgroup$
                                                                                                                    – Magic Octopus Urn
                                                                                                                    2 days ago






                                                                                                                  • 1




                                                                                                                    $begingroup$
                                                                                                                    @MagicOctopusUrn I'm not sure exactly what the rules are but I think your solution is different enough from mine to submit your own answer, no? Also, unrelated but I've seen your username on this site for a long time but only after typing it out did I realize that it's "Urn", not "Um" :)
                                                                                                                    $endgroup$
                                                                                                                    – Cowabunghole
                                                                                                                    2 days ago














                                                                                                                  1












                                                                                                                  1








                                                                                                                  1





                                                                                                                  $begingroup$


                                                                                                                  05AB1E, 13 12 bytes



                                                                                                                  ÐO5Qs`α5QrËO


                                                                                                                  Try it online!



                                                                                                                  Takes input as a list of integers, saving one byte. Thanks @Wisław!



                                                                                                                  Alternate 12 byte answer



                                                                                                                  Q¹²α5Q¹²+5QO


                                                                                                                  Try it online!



                                                                                                                  This one takes input on separate lines.






                                                                                                                  share|improve this answer











                                                                                                                  $endgroup$




                                                                                                                  05AB1E, 13 12 bytes



                                                                                                                  ÐO5Qs`α5QrËO


                                                                                                                  Try it online!



                                                                                                                  Takes input as a list of integers, saving one byte. Thanks @Wisław!



                                                                                                                  Alternate 12 byte answer



                                                                                                                  Q¹²α5Q¹²+5QO


                                                                                                                  Try it online!



                                                                                                                  This one takes input on separate lines.







                                                                                                                  share|improve this answer














                                                                                                                  share|improve this answer



                                                                                                                  share|improve this answer








                                                                                                                  edited 2 days ago

























                                                                                                                  answered 2 days ago









                                                                                                                  CowabungholeCowabunghole

                                                                                                                  1,075419




                                                                                                                  1,075419








                                                                                                                  • 1




                                                                                                                    $begingroup$
                                                                                                                    Since it is not very clearly specified, can you not assume the input is a list of integers, thus eliminating the initial |?
                                                                                                                    $endgroup$
                                                                                                                    – Wisław
                                                                                                                    2 days ago










                                                                                                                  • $begingroup$
                                                                                                                    @Wisław Good point, I updated my answer. Thanks!
                                                                                                                    $endgroup$
                                                                                                                    – Cowabunghole
                                                                                                                    2 days ago










                                                                                                                  • $begingroup$
                                                                                                                    I found a 11 bytes alternative: OI`αª5¢IË~Ā. Input is a list of integers.
                                                                                                                    $endgroup$
                                                                                                                    – Wisław
                                                                                                                    2 days ago








                                                                                                                  • 1




                                                                                                                    $begingroup$
                                                                                                                    OIÆÄ)5QIËM is 10.
                                                                                                                    $endgroup$
                                                                                                                    – Magic Octopus Urn
                                                                                                                    2 days ago






                                                                                                                  • 1




                                                                                                                    $begingroup$
                                                                                                                    @MagicOctopusUrn I'm not sure exactly what the rules are but I think your solution is different enough from mine to submit your own answer, no? Also, unrelated but I've seen your username on this site for a long time but only after typing it out did I realize that it's "Urn", not "Um" :)
                                                                                                                    $endgroup$
                                                                                                                    – Cowabunghole
                                                                                                                    2 days ago














                                                                                                                  • 1




                                                                                                                    $begingroup$
                                                                                                                    Since it is not very clearly specified, can you not assume the input is a list of integers, thus eliminating the initial |?
                                                                                                                    $endgroup$
                                                                                                                    – Wisław
                                                                                                                    2 days ago










                                                                                                                  • $begingroup$
                                                                                                                    @Wisław Good point, I updated my answer. Thanks!
                                                                                                                    $endgroup$
                                                                                                                    – Cowabunghole
                                                                                                                    2 days ago










                                                                                                                  • $begingroup$
                                                                                                                    I found a 11 bytes alternative: OI`αª5¢IË~Ā. Input is a list of integers.
                                                                                                                    $endgroup$
                                                                                                                    – Wisław
                                                                                                                    2 days ago








                                                                                                                  • 1




                                                                                                                    $begingroup$
                                                                                                                    OIÆÄ)5QIËM is 10.
                                                                                                                    $endgroup$
                                                                                                                    – Magic Octopus Urn
                                                                                                                    2 days ago






                                                                                                                  • 1




                                                                                                                    $begingroup$
                                                                                                                    @MagicOctopusUrn I'm not sure exactly what the rules are but I think your solution is different enough from mine to submit your own answer, no? Also, unrelated but I've seen your username on this site for a long time but only after typing it out did I realize that it's "Urn", not "Um" :)
                                                                                                                    $endgroup$
                                                                                                                    – Cowabunghole
                                                                                                                    2 days ago








                                                                                                                  1




                                                                                                                  1




                                                                                                                  $begingroup$
                                                                                                                  Since it is not very clearly specified, can you not assume the input is a list of integers, thus eliminating the initial |?
                                                                                                                  $endgroup$
                                                                                                                  – Wisław
                                                                                                                  2 days ago




                                                                                                                  $begingroup$
                                                                                                                  Since it is not very clearly specified, can you not assume the input is a list of integers, thus eliminating the initial |?
                                                                                                                  $endgroup$
                                                                                                                  – Wisław
                                                                                                                  2 days ago












                                                                                                                  $begingroup$
                                                                                                                  @Wisław Good point, I updated my answer. Thanks!
                                                                                                                  $endgroup$
                                                                                                                  – Cowabunghole
                                                                                                                  2 days ago




                                                                                                                  $begingroup$
                                                                                                                  @Wisław Good point, I updated my answer. Thanks!
                                                                                                                  $endgroup$
                                                                                                                  – Cowabunghole
                                                                                                                  2 days ago












                                                                                                                  $begingroup$
                                                                                                                  I found a 11 bytes alternative: OI`αª5¢IË~Ā. Input is a list of integers.
                                                                                                                  $endgroup$
                                                                                                                  – Wisław
                                                                                                                  2 days ago






                                                                                                                  $begingroup$
                                                                                                                  I found a 11 bytes alternative: OI`αª5¢IË~Ā. Input is a list of integers.
                                                                                                                  $endgroup$
                                                                                                                  – Wisław
                                                                                                                  2 days ago






                                                                                                                  1




                                                                                                                  1




                                                                                                                  $begingroup$
                                                                                                                  OIÆÄ)5QIËM is 10.
                                                                                                                  $endgroup$
                                                                                                                  – Magic Octopus Urn
                                                                                                                  2 days ago




                                                                                                                  $begingroup$
                                                                                                                  OIÆÄ)5QIËM is 10.
                                                                                                                  $endgroup$
                                                                                                                  – Magic Octopus Urn
                                                                                                                  2 days ago




                                                                                                                  1




                                                                                                                  1




                                                                                                                  $begingroup$
                                                                                                                  @MagicOctopusUrn I'm not sure exactly what the rules are but I think your solution is different enough from mine to submit your own answer, no? Also, unrelated but I've seen your username on this site for a long time but only after typing it out did I realize that it's "Urn", not "Um" :)
                                                                                                                  $endgroup$
                                                                                                                  – Cowabunghole
                                                                                                                  2 days ago




                                                                                                                  $begingroup$
                                                                                                                  @MagicOctopusUrn I'm not sure exactly what the rules are but I think your solution is different enough from mine to submit your own answer, no? Also, unrelated but I've seen your username on this site for a long time but only after typing it out did I realize that it's "Urn", not "Um" :)
                                                                                                                  $endgroup$
                                                                                                                  – Cowabunghole
                                                                                                                  2 days ago











                                                                                                                  1












                                                                                                                  $begingroup$

                                                                                                                  Batch, 81 bytes



                                                                                                                  @set/as=%1+%2,d=%1-%2
                                                                                                                  @if %d% neq 0 if %d:-=% neq 5 if %s% neq 5 exit/b
                                                                                                                  @echo 1


                                                                                                                  Takes input as command-line arguments and outputs 1 on success, nothing on failure. Batch can't easily do disjunctions so I use De Morgan's laws to turn it into a conjunction.






                                                                                                                  share|improve this answer









                                                                                                                  $endgroup$


















                                                                                                                    1












                                                                                                                    $begingroup$

                                                                                                                    Batch, 81 bytes



                                                                                                                    @set/as=%1+%2,d=%1-%2
                                                                                                                    @if %d% neq 0 if %d:-=% neq 5 if %s% neq 5 exit/b
                                                                                                                    @echo 1


                                                                                                                    Takes input as command-line arguments and outputs 1 on success, nothing on failure. Batch can't easily do disjunctions so I use De Morgan's laws to turn it into a conjunction.






                                                                                                                    share|improve this answer









                                                                                                                    $endgroup$
















                                                                                                                      1












                                                                                                                      1








                                                                                                                      1





                                                                                                                      $begingroup$

                                                                                                                      Batch, 81 bytes



                                                                                                                      @set/as=%1+%2,d=%1-%2
                                                                                                                      @if %d% neq 0 if %d:-=% neq 5 if %s% neq 5 exit/b
                                                                                                                      @echo 1


                                                                                                                      Takes input as command-line arguments and outputs 1 on success, nothing on failure. Batch can't easily do disjunctions so I use De Morgan's laws to turn it into a conjunction.






                                                                                                                      share|improve this answer









                                                                                                                      $endgroup$



                                                                                                                      Batch, 81 bytes



                                                                                                                      @set/as=%1+%2,d=%1-%2
                                                                                                                      @if %d% neq 0 if %d:-=% neq 5 if %s% neq 5 exit/b
                                                                                                                      @echo 1


                                                                                                                      Takes input as command-line arguments and outputs 1 on success, nothing on failure. Batch can't easily do disjunctions so I use De Morgan's laws to turn it into a conjunction.







                                                                                                                      share|improve this answer












                                                                                                                      share|improve this answer



                                                                                                                      share|improve this answer










                                                                                                                      answered 2 days ago









                                                                                                                      NeilNeil

                                                                                                                      79.9k744177




                                                                                                                      79.9k744177























                                                                                                                          1












                                                                                                                          $begingroup$


                                                                                                                          05AB1E, 10 bytes



                                                                                                                          OIÆ‚Ä50SåZ


                                                                                                                          Try it online!





                                                                                                                          O           # Sum the input.
                                                                                                                          IÆ # Reduced subtraction of the input.
                                                                                                                          ‚ # Wrap [sum,reduced_subtraction]
                                                                                                                          Ä # abs[sum,red_sub]
                                                                                                                          50S # [5,0]
                                                                                                                          å # [5,0] in abs[sum,red_sub]?
                                                                                                                          Z # Max of result, 0 is false, 1 is true.


                                                                                                                          Tried to do it using stack-only operations, but it was longer.






                                                                                                                          share|improve this answer









                                                                                                                          $endgroup$









                                                                                                                          • 1




                                                                                                                            $begingroup$
                                                                                                                            This will unfortunately return true if the sum is 0 such as for [5, -5]
                                                                                                                            $endgroup$
                                                                                                                            – Emigna
                                                                                                                            2 days ago






                                                                                                                          • 1




                                                                                                                            $begingroup$
                                                                                                                            Your other 10-byte solution that you left as a comment (OIÆÄ‚5QIËM) is correct for [5,-5].
                                                                                                                            $endgroup$
                                                                                                                            – Kevin Cruijssen
                                                                                                                            yesterday












                                                                                                                          • $begingroup$
                                                                                                                            Another 10-byte solution that I came up with is OsÆÄ‚5åsË~. Almost identical to yours it seems. Try it online!
                                                                                                                            $endgroup$
                                                                                                                            – Wisław
                                                                                                                            yesterday
















                                                                                                                          1












                                                                                                                          $begingroup$


                                                                                                                          05AB1E, 10 bytes



                                                                                                                          OIÆ‚Ä50SåZ


                                                                                                                          Try it online!





                                                                                                                          O           # Sum the input.
                                                                                                                          IÆ # Reduced subtraction of the input.
                                                                                                                          ‚ # Wrap [sum,reduced_subtraction]
                                                                                                                          Ä # abs[sum,red_sub]
                                                                                                                          50S # [5,0]
                                                                                                                          å # [5,0] in abs[sum,red_sub]?
                                                                                                                          Z # Max of result, 0 is false, 1 is true.


                                                                                                                          Tried to do it using stack-only operations, but it was longer.






                                                                                                                          share|improve this answer









                                                                                                                          $endgroup$









                                                                                                                          • 1




                                                                                                                            $begingroup$
                                                                                                                            This will unfortunately return true if the sum is 0 such as for [5, -5]
                                                                                                                            $endgroup$
                                                                                                                            – Emigna
                                                                                                                            2 days ago






                                                                                                                          • 1




                                                                                                                            $begingroup$
                                                                                                                            Your other 10-byte solution that you left as a comment (OIÆÄ‚5QIËM) is correct for [5,-5].
                                                                                                                            $endgroup$
                                                                                                                            – Kevin Cruijssen
                                                                                                                            yesterday












                                                                                                                          • $begingroup$
                                                                                                                            Another 10-byte solution that I came up with is OsÆÄ‚5åsË~. Almost identical to yours it seems. Try it online!
                                                                                                                            $endgroup$
                                                                                                                            – Wisław
                                                                                                                            yesterday














                                                                                                                          1












                                                                                                                          1








                                                                                                                          1





                                                                                                                          $begingroup$


                                                                                                                          05AB1E, 10 bytes



                                                                                                                          OIÆ‚Ä50SåZ


                                                                                                                          Try it online!





                                                                                                                          O           # Sum the input.
                                                                                                                          IÆ # Reduced subtraction of the input.
                                                                                                                          ‚ # Wrap [sum,reduced_subtraction]
                                                                                                                          Ä # abs[sum,red_sub]
                                                                                                                          50S # [5,0]
                                                                                                                          å # [5,0] in abs[sum,red_sub]?
                                                                                                                          Z # Max of result, 0 is false, 1 is true.


                                                                                                                          Tried to do it using stack-only operations, but it was longer.






                                                                                                                          share|improve this answer









                                                                                                                          $endgroup$




                                                                                                                          05AB1E, 10 bytes



                                                                                                                          OIÆ‚Ä50SåZ


                                                                                                                          Try it online!





                                                                                                                          O           # Sum the input.
                                                                                                                          IÆ # Reduced subtraction of the input.
                                                                                                                          ‚ # Wrap [sum,reduced_subtraction]
                                                                                                                          Ä # abs[sum,red_sub]
                                                                                                                          50S # [5,0]
                                                                                                                          å # [5,0] in abs[sum,red_sub]?
                                                                                                                          Z # Max of result, 0 is false, 1 is true.


                                                                                                                          Tried to do it using stack-only operations, but it was longer.







                                                                                                                          share|improve this answer












                                                                                                                          share|improve this answer



                                                                                                                          share|improve this answer










                                                                                                                          answered 2 days ago









                                                                                                                          Magic Octopus UrnMagic Octopus Urn

                                                                                                                          12.5k444125




                                                                                                                          12.5k444125








                                                                                                                          • 1




                                                                                                                            $begingroup$
                                                                                                                            This will unfortunately return true if the sum is 0 such as for [5, -5]
                                                                                                                            $endgroup$
                                                                                                                            – Emigna
                                                                                                                            2 days ago






                                                                                                                          • 1




                                                                                                                            $begingroup$
                                                                                                                            Your other 10-byte solution that you left as a comment (OIÆÄ‚5QIËM) is correct for [5,-5].
                                                                                                                            $endgroup$
                                                                                                                            – Kevin Cruijssen
                                                                                                                            yesterday












                                                                                                                          • $begingroup$
                                                                                                                            Another 10-byte solution that I came up with is OsÆÄ‚5åsË~. Almost identical to yours it seems. Try it online!
                                                                                                                            $endgroup$
                                                                                                                            – Wisław
                                                                                                                            yesterday














                                                                                                                          • 1




                                                                                                                            $begingroup$
                                                                                                                            This will unfortunately return true if the sum is 0 such as for [5, -5]
                                                                                                                            $endgroup$
                                                                                                                            – Emigna
                                                                                                                            2 days ago






                                                                                                                          • 1




                                                                                                                            $begingroup$
                                                                                                                            Your other 10-byte solution that you left as a comment (OIÆÄ‚5QIËM) is correct for [5,-5].
                                                                                                                            $endgroup$
                                                                                                                            – Kevin Cruijssen
                                                                                                                            yesterday












                                                                                                                          • $begingroup$
                                                                                                                            Another 10-byte solution that I came up with is OsÆÄ‚5åsË~. Almost identical to yours it seems. Try it online!
                                                                                                                            $endgroup$
                                                                                                                            – Wisław
                                                                                                                            yesterday








                                                                                                                          1




                                                                                                                          1




                                                                                                                          $begingroup$
                                                                                                                          This will unfortunately return true if the sum is 0 such as for [5, -5]
                                                                                                                          $endgroup$
                                                                                                                          – Emigna
                                                                                                                          2 days ago




                                                                                                                          $begingroup$
                                                                                                                          This will unfortunately return true if the sum is 0 such as for [5, -5]
                                                                                                                          $endgroup$
                                                                                                                          – Emigna
                                                                                                                          2 days ago




                                                                                                                          1




                                                                                                                          1




                                                                                                                          $begingroup$
                                                                                                                          Your other 10-byte solution that you left as a comment (OIÆÄ‚5QIËM) is correct for [5,-5].
                                                                                                                          $endgroup$
                                                                                                                          – Kevin Cruijssen
                                                                                                                          yesterday






                                                                                                                          $begingroup$
                                                                                                                          Your other 10-byte solution that you left as a comment (OIÆÄ‚5QIËM) is correct for [5,-5].
                                                                                                                          $endgroup$
                                                                                                                          – Kevin Cruijssen
                                                                                                                          yesterday














                                                                                                                          $begingroup$
                                                                                                                          Another 10-byte solution that I came up with is OsÆÄ‚5åsË~. Almost identical to yours it seems. Try it online!
                                                                                                                          $endgroup$
                                                                                                                          – Wisław
                                                                                                                          yesterday




                                                                                                                          $begingroup$
                                                                                                                          Another 10-byte solution that I came up with is OsÆÄ‚5åsË~. Almost identical to yours it seems. Try it online!
                                                                                                                          $endgroup$
                                                                                                                          – Wisław
                                                                                                                          yesterday











                                                                                                                          1












                                                                                                                          $begingroup$


                                                                                                                          Charcoal, 18 bytes



                                                                                                                          Nθ¿№⟦θ⁺⁵θ⁻⁵θ⁻θ⁵⟧N1


                                                                                                                          Try it online! Link is to verbose version of code. Port of @ArBo's Python 2 solution.






                                                                                                                          share|improve this answer









                                                                                                                          $endgroup$


















                                                                                                                            1












                                                                                                                            $begingroup$


                                                                                                                            Charcoal, 18 bytes



                                                                                                                            Nθ¿№⟦θ⁺⁵θ⁻⁵θ⁻θ⁵⟧N1


                                                                                                                            Try it online! Link is to verbose version of code. Port of @ArBo's Python 2 solution.






                                                                                                                            share|improve this answer









                                                                                                                            $endgroup$
















                                                                                                                              1












                                                                                                                              1








                                                                                                                              1





                                                                                                                              $begingroup$


                                                                                                                              Charcoal, 18 bytes



                                                                                                                              Nθ¿№⟦θ⁺⁵θ⁻⁵θ⁻θ⁵⟧N1


                                                                                                                              Try it online! Link is to verbose version of code. Port of @ArBo's Python 2 solution.






                                                                                                                              share|improve this answer









                                                                                                                              $endgroup$




                                                                                                                              Charcoal, 18 bytes



                                                                                                                              Nθ¿№⟦θ⁺⁵θ⁻⁵θ⁻θ⁵⟧N1


                                                                                                                              Try it online! Link is to verbose version of code. Port of @ArBo's Python 2 solution.







                                                                                                                              share|improve this answer












                                                                                                                              share|improve this answer



                                                                                                                              share|improve this answer










                                                                                                                              answered 2 days ago









                                                                                                                              NeilNeil

                                                                                                                              79.9k744177




                                                                                                                              79.9k744177























                                                                                                                                  1












                                                                                                                                  $begingroup$

                                                                                                                                  Japt, 13 12 bytes



                                                                                                                                  x ¥5|50ìøUra


                                                                                                                                  Try it or run all test cases



                                                                                                                                  x ¥5|50ìøUra
                                                                                                                                  :Implicit input of array U
                                                                                                                                  x :Reduce by addition
                                                                                                                                  ¥5 :Equal to 5?
                                                                                                                                  | :Bitwise OR
                                                                                                                                  50ì :Split 50 to an array of digits
                                                                                                                                  ø :Contains?
                                                                                                                                  Ur : Reduce U
                                                                                                                                  a : By absolute difference





                                                                                                                                  share|improve this answer











                                                                                                                                  $endgroup$













                                                                                                                                  • $begingroup$
                                                                                                                                    Fails for [-5,5] (should be falsey)
                                                                                                                                    $endgroup$
                                                                                                                                    – Kevin Cruijssen
                                                                                                                                    yesterday










                                                                                                                                  • $begingroup$
                                                                                                                                    Thanks, @KevinCruijssen. Rolled back to the previous version.
                                                                                                                                    $endgroup$
                                                                                                                                    – Shaggy
                                                                                                                                    yesterday
















                                                                                                                                  1












                                                                                                                                  $begingroup$

                                                                                                                                  Japt, 13 12 bytes



                                                                                                                                  x ¥5|50ìøUra


                                                                                                                                  Try it or run all test cases



                                                                                                                                  x ¥5|50ìøUra
                                                                                                                                  :Implicit input of array U
                                                                                                                                  x :Reduce by addition
                                                                                                                                  ¥5 :Equal to 5?
                                                                                                                                  | :Bitwise OR
                                                                                                                                  50ì :Split 50 to an array of digits
                                                                                                                                  ø :Contains?
                                                                                                                                  Ur : Reduce U
                                                                                                                                  a : By absolute difference





                                                                                                                                  share|improve this answer











                                                                                                                                  $endgroup$













                                                                                                                                  • $begingroup$
                                                                                                                                    Fails for [-5,5] (should be falsey)
                                                                                                                                    $endgroup$
                                                                                                                                    – Kevin Cruijssen
                                                                                                                                    yesterday










                                                                                                                                  • $begingroup$
                                                                                                                                    Thanks, @KevinCruijssen. Rolled back to the previous version.
                                                                                                                                    $endgroup$
                                                                                                                                    – Shaggy
                                                                                                                                    yesterday














                                                                                                                                  1












                                                                                                                                  1








                                                                                                                                  1





                                                                                                                                  $begingroup$

                                                                                                                                  Japt, 13 12 bytes



                                                                                                                                  x ¥5|50ìøUra


                                                                                                                                  Try it or run all test cases



                                                                                                                                  x ¥5|50ìøUra
                                                                                                                                  :Implicit input of array U
                                                                                                                                  x :Reduce by addition
                                                                                                                                  ¥5 :Equal to 5?
                                                                                                                                  | :Bitwise OR
                                                                                                                                  50ì :Split 50 to an array of digits
                                                                                                                                  ø :Contains?
                                                                                                                                  Ur : Reduce U
                                                                                                                                  a : By absolute difference





                                                                                                                                  share|improve this answer











                                                                                                                                  $endgroup$



                                                                                                                                  Japt, 13 12 bytes



                                                                                                                                  x ¥5|50ìøUra


                                                                                                                                  Try it or run all test cases



                                                                                                                                  x ¥5|50ìøUra
                                                                                                                                  :Implicit input of array U
                                                                                                                                  x :Reduce by addition
                                                                                                                                  ¥5 :Equal to 5?
                                                                                                                                  | :Bitwise OR
                                                                                                                                  50ì :Split 50 to an array of digits
                                                                                                                                  ø :Contains?
                                                                                                                                  Ur : Reduce U
                                                                                                                                  a : By absolute difference






                                                                                                                                  share|improve this answer














                                                                                                                                  share|improve this answer



                                                                                                                                  share|improve this answer








                                                                                                                                  edited yesterday

























                                                                                                                                  answered 2 days ago









                                                                                                                                  ShaggyShaggy

                                                                                                                                  19.3k21666




                                                                                                                                  19.3k21666












                                                                                                                                  • $begingroup$
                                                                                                                                    Fails for [-5,5] (should be falsey)
                                                                                                                                    $endgroup$
                                                                                                                                    – Kevin Cruijssen
                                                                                                                                    yesterday










                                                                                                                                  • $begingroup$
                                                                                                                                    Thanks, @KevinCruijssen. Rolled back to the previous version.
                                                                                                                                    $endgroup$
                                                                                                                                    – Shaggy
                                                                                                                                    yesterday


















                                                                                                                                  • $begingroup$
                                                                                                                                    Fails for [-5,5] (should be falsey)
                                                                                                                                    $endgroup$
                                                                                                                                    – Kevin Cruijssen
                                                                                                                                    yesterday










                                                                                                                                  • $begingroup$
                                                                                                                                    Thanks, @KevinCruijssen. Rolled back to the previous version.
                                                                                                                                    $endgroup$
                                                                                                                                    – Shaggy
                                                                                                                                    yesterday
















                                                                                                                                  $begingroup$
                                                                                                                                  Fails for [-5,5] (should be falsey)
                                                                                                                                  $endgroup$
                                                                                                                                  – Kevin Cruijssen
                                                                                                                                  yesterday




                                                                                                                                  $begingroup$
                                                                                                                                  Fails for [-5,5] (should be falsey)
                                                                                                                                  $endgroup$
                                                                                                                                  – Kevin Cruijssen
                                                                                                                                  yesterday












                                                                                                                                  $begingroup$
                                                                                                                                  Thanks, @KevinCruijssen. Rolled back to the previous version.
                                                                                                                                  $endgroup$
                                                                                                                                  – Shaggy
                                                                                                                                  yesterday




                                                                                                                                  $begingroup$
                                                                                                                                  Thanks, @KevinCruijssen. Rolled back to the previous version.
                                                                                                                                  $endgroup$
                                                                                                                                  – Shaggy
                                                                                                                                  yesterday











                                                                                                                                  1












                                                                                                                                  $begingroup$

                                                                                                                                  Common Lisp, 48 bytes



                                                                                                                                  (lambda(a b)(find 5(list(abs(- b a))a(+ a b)b)))





                                                                                                                                  share|improve this answer









                                                                                                                                  $endgroup$


















                                                                                                                                    1












                                                                                                                                    $begingroup$

                                                                                                                                    Common Lisp, 48 bytes



                                                                                                                                    (lambda(a b)(find 5(list(abs(- b a))a(+ a b)b)))





                                                                                                                                    share|improve this answer









                                                                                                                                    $endgroup$
















                                                                                                                                      1












                                                                                                                                      1








                                                                                                                                      1





                                                                                                                                      $begingroup$

                                                                                                                                      Common Lisp, 48 bytes



                                                                                                                                      (lambda(a b)(find 5(list(abs(- b a))a(+ a b)b)))





                                                                                                                                      share|improve this answer









                                                                                                                                      $endgroup$



                                                                                                                                      Common Lisp, 48 bytes



                                                                                                                                      (lambda(a b)(find 5(list(abs(- b a))a(+ a b)b)))






                                                                                                                                      share|improve this answer












                                                                                                                                      share|improve this answer



                                                                                                                                      share|improve this answer










                                                                                                                                      answered yesterday









                                                                                                                                      coredumpcoredump

                                                                                                                                      5,6921641




                                                                                                                                      5,6921641























                                                                                                                                          0












                                                                                                                                          $begingroup$


                                                                                                                                          Runic Enchantments, 30 bytes



                                                                                                                                          i::i::}3s=?!@-'|A"5"n:}=?!@+=@


                                                                                                                                          Try it online!



                                                                                                                                          With a pending update, 4 bytes can be saved, as presently integer inputs are treated as doubles and don't equal integers of the same value. Hence "5"n instead of just 5. This was an oversight and several factors are being adjusted to account for it (such as using Approximately(a, b) instead of a.Equals(b)).



                                                                                                                                          Outputs 0 (exactly one zero) for false and any other output (literally whatever is left on the stack) for true.






                                                                                                                                          share|improve this answer









                                                                                                                                          $endgroup$


















                                                                                                                                            0












                                                                                                                                            $begingroup$


                                                                                                                                            Runic Enchantments, 30 bytes



                                                                                                                                            i::i::}3s=?!@-'|A"5"n:}=?!@+=@


                                                                                                                                            Try it online!



                                                                                                                                            With a pending update, 4 bytes can be saved, as presently integer inputs are treated as doubles and don't equal integers of the same value. Hence "5"n instead of just 5. This was an oversight and several factors are being adjusted to account for it (such as using Approximately(a, b) instead of a.Equals(b)).



                                                                                                                                            Outputs 0 (exactly one zero) for false and any other output (literally whatever is left on the stack) for true.






                                                                                                                                            share|improve this answer









                                                                                                                                            $endgroup$
















                                                                                                                                              0












                                                                                                                                              0








                                                                                                                                              0





                                                                                                                                              $begingroup$


                                                                                                                                              Runic Enchantments, 30 bytes



                                                                                                                                              i::i::}3s=?!@-'|A"5"n:}=?!@+=@


                                                                                                                                              Try it online!



                                                                                                                                              With a pending update, 4 bytes can be saved, as presently integer inputs are treated as doubles and don't equal integers of the same value. Hence "5"n instead of just 5. This was an oversight and several factors are being adjusted to account for it (such as using Approximately(a, b) instead of a.Equals(b)).



                                                                                                                                              Outputs 0 (exactly one zero) for false and any other output (literally whatever is left on the stack) for true.






                                                                                                                                              share|improve this answer









                                                                                                                                              $endgroup$




                                                                                                                                              Runic Enchantments, 30 bytes



                                                                                                                                              i::i::}3s=?!@-'|A"5"n:}=?!@+=@


                                                                                                                                              Try it online!



                                                                                                                                              With a pending update, 4 bytes can be saved, as presently integer inputs are treated as doubles and don't equal integers of the same value. Hence "5"n instead of just 5. This was an oversight and several factors are being adjusted to account for it (such as using Approximately(a, b) instead of a.Equals(b)).



                                                                                                                                              Outputs 0 (exactly one zero) for false and any other output (literally whatever is left on the stack) for true.







                                                                                                                                              share|improve this answer












                                                                                                                                              share|improve this answer



                                                                                                                                              share|improve this answer










                                                                                                                                              answered 2 days ago









                                                                                                                                              Draco18sDraco18s

                                                                                                                                              1,261619




                                                                                                                                              1,261619























                                                                                                                                                  0












                                                                                                                                                  $begingroup$


                                                                                                                                                  Retina 0.8.2, 82 bytes



                                                                                                                                                  d+
                                                                                                                                                  $*
                                                                                                                                                  ^(-?1*) 1$|^(-?1*)1{5} -?2$|^-?(-?1*) (3)1{5}$|^-?(1 ?){5}$|^(1 ?-?){5}$


                                                                                                                                                  Try it online! Link includes test cases. Explanation: The first two lines convert the inputs into unary. The final line then checks for any of the permitted matches:



                                                                                                                                                  ^(-?1*) 1$                              x==y
                                                                                                                                                  ^(-?1*)1{5} -?2$ x>=0 y>=0 x=5+y i.e. x-y=5
                                                                                                                                                  x>=0 y<=0 x=5-y i.e. x+y=5
                                                                                                                                                  x<=0 y<=0 x=y-5 i.e. y-x=5
                                                                                                                                                  ^-?(-?1*) (3)1{5}$ x<=0 y<=0 y=x-5 i.e. x-y=5
                                                                                                                                                  x<=0 y>=0 y=5-x i.e. x+y=5
                                                                                                                                                  x>=0 y>=0 y=5+x i.e. y-x=5
                                                                                                                                                  ^-?(1 ?){5}$ x>=0 y>=0 y=5-x i.e. x+y=5
                                                                                                                                                  x<=0 y>=0 y=5+x i.e. y-x=5
                                                                                                                                                  ^(1 ?-?){5}$ x>=0 y>=0 x=5-y i.e. x+y=5
                                                                                                                                                  x>=0 y<=0 x=5+y i.e. x-y=5


                                                                                                                                                  Pivoted by the last column we get:



                                                                                                                                                  x==y            ^(-?1*) 1$
                                                                                                                                                  x+y=5 x>=0 y>=0 ^-?(1 ?){5}$
                                                                                                                                                  x>=0 y>=0 ^(1 ?-?){5}$
                                                                                                                                                  x>=0 y<=0 ^(-?1*)1{5} -?2$
                                                                                                                                                  x<=0 y>=0 ^-?(-?1*) (3)1{5}$
                                                                                                                                                  x<=0 y<=0 (impossible)
                                                                                                                                                  x-y=5 x>=0 y>=0 ^(-?1*)1{5} -?2$
                                                                                                                                                  x>=0 y<=0 ^(1 ?-?){5}$
                                                                                                                                                  x<=0 y>=0 (impossible)
                                                                                                                                                  x<=0 y<=0 ^-?(-?1*) (3)1{5}$
                                                                                                                                                  y-x=5 x>=0 y>=0 ^-?(-?1*) (3)1{5}$
                                                                                                                                                  x>=0 y<=0 (impossible)
                                                                                                                                                  x<=0 y>=0 ^-?(1 ?){5}$
                                                                                                                                                  x<=0 y<=0 ^(-?1*)1{5} -?2$





                                                                                                                                                  share|improve this answer









                                                                                                                                                  $endgroup$


















                                                                                                                                                    0












                                                                                                                                                    $begingroup$


                                                                                                                                                    Retina 0.8.2, 82 bytes



                                                                                                                                                    d+
                                                                                                                                                    $*
                                                                                                                                                    ^(-?1*) 1$|^(-?1*)1{5} -?2$|^-?(-?1*) (3)1{5}$|^-?(1 ?){5}$|^(1 ?-?){5}$


                                                                                                                                                    Try it online! Link includes test cases. Explanation: The first two lines convert the inputs into unary. The final line then checks for any of the permitted matches:



                                                                                                                                                    ^(-?1*) 1$                              x==y
                                                                                                                                                    ^(-?1*)1{5} -?2$ x>=0 y>=0 x=5+y i.e. x-y=5
                                                                                                                                                    x>=0 y<=0 x=5-y i.e. x+y=5
                                                                                                                                                    x<=0 y<=0 x=y-5 i.e. y-x=5
                                                                                                                                                    ^-?(-?1*) (3)1{5}$ x<=0 y<=0 y=x-5 i.e. x-y=5
                                                                                                                                                    x<=0 y>=0 y=5-x i.e. x+y=5
                                                                                                                                                    x>=0 y>=0 y=5+x i.e. y-x=5
                                                                                                                                                    ^-?(1 ?){5}$ x>=0 y>=0 y=5-x i.e. x+y=5
                                                                                                                                                    x<=0 y>=0 y=5+x i.e. y-x=5
                                                                                                                                                    ^(1 ?-?){5}$ x>=0 y>=0 x=5-y i.e. x+y=5
                                                                                                                                                    x>=0 y<=0 x=5+y i.e. x-y=5


                                                                                                                                                    Pivoted by the last column we get:



                                                                                                                                                    x==y            ^(-?1*) 1$
                                                                                                                                                    x+y=5 x>=0 y>=0 ^-?(1 ?){5}$
                                                                                                                                                    x>=0 y>=0 ^(1 ?-?){5}$
                                                                                                                                                    x>=0 y<=0 ^(-?1*)1{5} -?2$
                                                                                                                                                    x<=0 y>=0 ^-?(-?1*) (3)1{5}$
                                                                                                                                                    x<=0 y<=0 (impossible)
                                                                                                                                                    x-y=5 x>=0 y>=0 ^(-?1*)1{5} -?2$
                                                                                                                                                    x>=0 y<=0 ^(1 ?-?){5}$
                                                                                                                                                    x<=0 y>=0 (impossible)
                                                                                                                                                    x<=0 y<=0 ^-?(-?1*) (3)1{5}$
                                                                                                                                                    y-x=5 x>=0 y>=0 ^-?(-?1*) (3)1{5}$
                                                                                                                                                    x>=0 y<=0 (impossible)
                                                                                                                                                    x<=0 y>=0 ^-?(1 ?){5}$
                                                                                                                                                    x<=0 y<=0 ^(-?1*)1{5} -?2$





                                                                                                                                                    share|improve this answer









                                                                                                                                                    $endgroup$
















                                                                                                                                                      0












                                                                                                                                                      0








                                                                                                                                                      0





                                                                                                                                                      $begingroup$


                                                                                                                                                      Retina 0.8.2, 82 bytes



                                                                                                                                                      d+
                                                                                                                                                      $*
                                                                                                                                                      ^(-?1*) 1$|^(-?1*)1{5} -?2$|^-?(-?1*) (3)1{5}$|^-?(1 ?){5}$|^(1 ?-?){5}$


                                                                                                                                                      Try it online! Link includes test cases. Explanation: The first two lines convert the inputs into unary. The final line then checks for any of the permitted matches:



                                                                                                                                                      ^(-?1*) 1$                              x==y
                                                                                                                                                      ^(-?1*)1{5} -?2$ x>=0 y>=0 x=5+y i.e. x-y=5
                                                                                                                                                      x>=0 y<=0 x=5-y i.e. x+y=5
                                                                                                                                                      x<=0 y<=0 x=y-5 i.e. y-x=5
                                                                                                                                                      ^-?(-?1*) (3)1{5}$ x<=0 y<=0 y=x-5 i.e. x-y=5
                                                                                                                                                      x<=0 y>=0 y=5-x i.e. x+y=5
                                                                                                                                                      x>=0 y>=0 y=5+x i.e. y-x=5
                                                                                                                                                      ^-?(1 ?){5}$ x>=0 y>=0 y=5-x i.e. x+y=5
                                                                                                                                                      x<=0 y>=0 y=5+x i.e. y-x=5
                                                                                                                                                      ^(1 ?-?){5}$ x>=0 y>=0 x=5-y i.e. x+y=5
                                                                                                                                                      x>=0 y<=0 x=5+y i.e. x-y=5


                                                                                                                                                      Pivoted by the last column we get:



                                                                                                                                                      x==y            ^(-?1*) 1$
                                                                                                                                                      x+y=5 x>=0 y>=0 ^-?(1 ?){5}$
                                                                                                                                                      x>=0 y>=0 ^(1 ?-?){5}$
                                                                                                                                                      x>=0 y<=0 ^(-?1*)1{5} -?2$
                                                                                                                                                      x<=0 y>=0 ^-?(-?1*) (3)1{5}$
                                                                                                                                                      x<=0 y<=0 (impossible)
                                                                                                                                                      x-y=5 x>=0 y>=0 ^(-?1*)1{5} -?2$
                                                                                                                                                      x>=0 y<=0 ^(1 ?-?){5}$
                                                                                                                                                      x<=0 y>=0 (impossible)
                                                                                                                                                      x<=0 y<=0 ^-?(-?1*) (3)1{5}$
                                                                                                                                                      y-x=5 x>=0 y>=0 ^-?(-?1*) (3)1{5}$
                                                                                                                                                      x>=0 y<=0 (impossible)
                                                                                                                                                      x<=0 y>=0 ^-?(1 ?){5}$
                                                                                                                                                      x<=0 y<=0 ^(-?1*)1{5} -?2$





                                                                                                                                                      share|improve this answer









                                                                                                                                                      $endgroup$




                                                                                                                                                      Retina 0.8.2, 82 bytes



                                                                                                                                                      d+
                                                                                                                                                      $*
                                                                                                                                                      ^(-?1*) 1$|^(-?1*)1{5} -?2$|^-?(-?1*) (3)1{5}$|^-?(1 ?){5}$|^(1 ?-?){5}$


                                                                                                                                                      Try it online! Link includes test cases. Explanation: The first two lines convert the inputs into unary. The final line then checks for any of the permitted matches:



                                                                                                                                                      ^(-?1*) 1$                              x==y
                                                                                                                                                      ^(-?1*)1{5} -?2$ x>=0 y>=0 x=5+y i.e. x-y=5
                                                                                                                                                      x>=0 y<=0 x=5-y i.e. x+y=5
                                                                                                                                                      x<=0 y<=0 x=y-5 i.e. y-x=5
                                                                                                                                                      ^-?(-?1*) (3)1{5}$ x<=0 y<=0 y=x-5 i.e. x-y=5
                                                                                                                                                      x<=0 y>=0 y=5-x i.e. x+y=5
                                                                                                                                                      x>=0 y>=0 y=5+x i.e. y-x=5
                                                                                                                                                      ^-?(1 ?){5}$ x>=0 y>=0 y=5-x i.e. x+y=5
                                                                                                                                                      x<=0 y>=0 y=5+x i.e. y-x=5
                                                                                                                                                      ^(1 ?-?){5}$ x>=0 y>=0 x=5-y i.e. x+y=5
                                                                                                                                                      x>=0 y<=0 x=5+y i.e. x-y=5


                                                                                                                                                      Pivoted by the last column we get:



                                                                                                                                                      x==y            ^(-?1*) 1$
                                                                                                                                                      x+y=5 x>=0 y>=0 ^-?(1 ?){5}$
                                                                                                                                                      x>=0 y>=0 ^(1 ?-?){5}$
                                                                                                                                                      x>=0 y<=0 ^(-?1*)1{5} -?2$
                                                                                                                                                      x<=0 y>=0 ^-?(-?1*) (3)1{5}$
                                                                                                                                                      x<=0 y<=0 (impossible)
                                                                                                                                                      x-y=5 x>=0 y>=0 ^(-?1*)1{5} -?2$
                                                                                                                                                      x>=0 y<=0 ^(1 ?-?){5}$
                                                                                                                                                      x<=0 y>=0 (impossible)
                                                                                                                                                      x<=0 y<=0 ^-?(-?1*) (3)1{5}$
                                                                                                                                                      y-x=5 x>=0 y>=0 ^-?(-?1*) (3)1{5}$
                                                                                                                                                      x>=0 y<=0 (impossible)
                                                                                                                                                      x<=0 y>=0 ^-?(1 ?){5}$
                                                                                                                                                      x<=0 y<=0 ^(-?1*)1{5} -?2$






                                                                                                                                                      share|improve this answer












                                                                                                                                                      share|improve this answer



                                                                                                                                                      share|improve this answer










                                                                                                                                                      answered 2 days ago









                                                                                                                                                      NeilNeil

                                                                                                                                                      79.9k744177




                                                                                                                                                      79.9k744177























                                                                                                                                                          0












                                                                                                                                                          $begingroup$


                                                                                                                                                          Perl 5, 51 bytes



                                                                                                                                                          Pretty simple really, uses the an flags for input. Outputs 0 for false, 1 for true. Not gonna lie, I don't know if bitwise OR is appropriate here, but is does work for all the test cases, so that's nice.





                                                                                                                                                          ($a,$b)=@F;print($a==$b|$a+$b==5|$a-$b==5|$b-$a==5)


                                                                                                                                                          Try it online!






                                                                                                                                                          share|improve this answer











                                                                                                                                                          $endgroup$









                                                                                                                                                          • 1




                                                                                                                                                            $begingroup$
                                                                                                                                                            bitwise OR is equivalent to logical OR when operating on one-bit values. In general, if passed a truthy arguments bitwise OR will return truthy, and if passed two falsy arguments bitwise OR will return 0.
                                                                                                                                                            $endgroup$
                                                                                                                                                            – attinat
                                                                                                                                                            yesterday


















                                                                                                                                                          0












                                                                                                                                                          $begingroup$


                                                                                                                                                          Perl 5, 51 bytes



                                                                                                                                                          Pretty simple really, uses the an flags for input. Outputs 0 for false, 1 for true. Not gonna lie, I don't know if bitwise OR is appropriate here, but is does work for all the test cases, so that's nice.





                                                                                                                                                          ($a,$b)=@F;print($a==$b|$a+$b==5|$a-$b==5|$b-$a==5)


                                                                                                                                                          Try it online!






                                                                                                                                                          share|improve this answer











                                                                                                                                                          $endgroup$









                                                                                                                                                          • 1




                                                                                                                                                            $begingroup$
                                                                                                                                                            bitwise OR is equivalent to logical OR when operating on one-bit values. In general, if passed a truthy arguments bitwise OR will return truthy, and if passed two falsy arguments bitwise OR will return 0.
                                                                                                                                                            $endgroup$
                                                                                                                                                            – attinat
                                                                                                                                                            yesterday
















                                                                                                                                                          0












                                                                                                                                                          0








                                                                                                                                                          0





                                                                                                                                                          $begingroup$


                                                                                                                                                          Perl 5, 51 bytes



                                                                                                                                                          Pretty simple really, uses the an flags for input. Outputs 0 for false, 1 for true. Not gonna lie, I don't know if bitwise OR is appropriate here, but is does work for all the test cases, so that's nice.





                                                                                                                                                          ($a,$b)=@F;print($a==$b|$a+$b==5|$a-$b==5|$b-$a==5)


                                                                                                                                                          Try it online!






                                                                                                                                                          share|improve this answer











                                                                                                                                                          $endgroup$




                                                                                                                                                          Perl 5, 51 bytes



                                                                                                                                                          Pretty simple really, uses the an flags for input. Outputs 0 for false, 1 for true. Not gonna lie, I don't know if bitwise OR is appropriate here, but is does work for all the test cases, so that's nice.





                                                                                                                                                          ($a,$b)=@F;print($a==$b|$a+$b==5|$a-$b==5|$b-$a==5)


                                                                                                                                                          Try it online!







                                                                                                                                                          share|improve this answer














                                                                                                                                                          share|improve this answer



                                                                                                                                                          share|improve this answer








                                                                                                                                                          edited 2 days ago

























                                                                                                                                                          answered 2 days ago









                                                                                                                                                          Geoffrey H.Geoffrey H.

                                                                                                                                                          414




                                                                                                                                                          414








                                                                                                                                                          • 1




                                                                                                                                                            $begingroup$
                                                                                                                                                            bitwise OR is equivalent to logical OR when operating on one-bit values. In general, if passed a truthy arguments bitwise OR will return truthy, and if passed two falsy arguments bitwise OR will return 0.
                                                                                                                                                            $endgroup$
                                                                                                                                                            – attinat
                                                                                                                                                            yesterday
















                                                                                                                                                          • 1




                                                                                                                                                            $begingroup$
                                                                                                                                                            bitwise OR is equivalent to logical OR when operating on one-bit values. In general, if passed a truthy arguments bitwise OR will return truthy, and if passed two falsy arguments bitwise OR will return 0.
                                                                                                                                                            $endgroup$
                                                                                                                                                            – attinat
                                                                                                                                                            yesterday










                                                                                                                                                          1




                                                                                                                                                          1




                                                                                                                                                          $begingroup$
                                                                                                                                                          bitwise OR is equivalent to logical OR when operating on one-bit values. In general, if passed a truthy arguments bitwise OR will return truthy, and if passed two falsy arguments bitwise OR will return 0.
                                                                                                                                                          $endgroup$
                                                                                                                                                          – attinat
                                                                                                                                                          yesterday






                                                                                                                                                          $begingroup$
                                                                                                                                                          bitwise OR is equivalent to logical OR when operating on one-bit values. In general, if passed a truthy arguments bitwise OR will return truthy, and if passed two falsy arguments bitwise OR will return 0.
                                                                                                                                                          $endgroup$
                                                                                                                                                          – attinat
                                                                                                                                                          yesterday













                                                                                                                                                          0












                                                                                                                                                          $begingroup$


                                                                                                                                                          Julia 1.0, 38 bytes





                                                                                                                                                          f(a,b)=((a+b-5)*(a-b)*(abs(a-b)-5))==0


                                                                                                                                                          Try it online!



                                                                                                                                                          Of course, it's probably not the shortest one






                                                                                                                                                          share|improve this answer









                                                                                                                                                          $endgroup$


















                                                                                                                                                            0












                                                                                                                                                            $begingroup$


                                                                                                                                                            Julia 1.0, 38 bytes





                                                                                                                                                            f(a,b)=((a+b-5)*(a-b)*(abs(a-b)-5))==0


                                                                                                                                                            Try it online!



                                                                                                                                                            Of course, it's probably not the shortest one






                                                                                                                                                            share|improve this answer









                                                                                                                                                            $endgroup$
















                                                                                                                                                              0












                                                                                                                                                              0








                                                                                                                                                              0





                                                                                                                                                              $begingroup$


                                                                                                                                                              Julia 1.0, 38 bytes





                                                                                                                                                              f(a,b)=((a+b-5)*(a-b)*(abs(a-b)-5))==0


                                                                                                                                                              Try it online!



                                                                                                                                                              Of course, it's probably not the shortest one






                                                                                                                                                              share|improve this answer









                                                                                                                                                              $endgroup$




                                                                                                                                                              Julia 1.0, 38 bytes





                                                                                                                                                              f(a,b)=((a+b-5)*(a-b)*(abs(a-b)-5))==0


                                                                                                                                                              Try it online!



                                                                                                                                                              Of course, it's probably not the shortest one







                                                                                                                                                              share|improve this answer












                                                                                                                                                              share|improve this answer



                                                                                                                                                              share|improve this answer










                                                                                                                                                              answered yesterday









                                                                                                                                                              trolley813trolley813

                                                                                                                                                              1272




                                                                                                                                                              1272






















                                                                                                                                                                  Vikrant Biswas is a new contributor. Be nice, and check out our Code of Conduct.










                                                                                                                                                                  draft saved

                                                                                                                                                                  draft discarded


















                                                                                                                                                                  Vikrant Biswas is a new contributor. Be nice, and check out our Code of Conduct.













                                                                                                                                                                  Vikrant Biswas is a new contributor. Be nice, and check out our Code of Conduct.












                                                                                                                                                                  Vikrant Biswas is a new contributor. Be nice, and check out our Code of Conduct.
















                                                                                                                                                                  If this is an answer to a challenge…




                                                                                                                                                                  • …Be sure to follow the challenge specification. However, please refrain from exploiting obvious loopholes. Answers abusing any of the standard loopholes are considered invalid. If you think a specification is unclear or underspecified, comment on the question instead.


                                                                                                                                                                  • …Try to optimize your score. For instance, answers to code-golf challenges should attempt to be as short as possible. You can always include a readable version of the code in addition to the competitive one.
                                                                                                                                                                    Explanations of your answer make it more interesting to read and are very much encouraged.


                                                                                                                                                                  • …Include a short header which indicates the language(s) of your code and its score, as defined by the challenge.



                                                                                                                                                                  More generally…




                                                                                                                                                                  • …Please make sure to answer the question and provide sufficient detail.


                                                                                                                                                                  • …Avoid asking for help, clarification or responding to other answers (use comments instead).





                                                                                                                                                                  draft saved


                                                                                                                                                                  draft discarded














                                                                                                                                                                  StackExchange.ready(
                                                                                                                                                                  function () {
                                                                                                                                                                  StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fcodegolf.stackexchange.com%2fquestions%2f178792%2fequal-sum-or-difference%23new-answer', 'question_page');
                                                                                                                                                                  }
                                                                                                                                                                  );

                                                                                                                                                                  Post as a guest















                                                                                                                                                                  Required, but never shown





















































                                                                                                                                                                  Required, but never shown














                                                                                                                                                                  Required, but never shown












                                                                                                                                                                  Required, but never shown







                                                                                                                                                                  Required, but never shown

































                                                                                                                                                                  Required, but never shown














                                                                                                                                                                  Required, but never shown












                                                                                                                                                                  Required, but never shown







                                                                                                                                                                  Required, but never shown







                                                                                                                                                                  Popular posts from this blog

                                                                                                                                                                  SQL Server 17 - Attemping to backup to remote NAS but Access is denied

                                                                                                                                                                  Always On Availability groups resolving state after failover - Remote harden of transaction...

                                                                                                                                                                  Restoring from pg_dump with foreign key constraints