a, b, c三角形の3辺の長さを考えて、三角形が直角（つまり、1つの角度が90度に等しい）かどうかを判断します。

入力

任意の順序の 3つの正の整数値

出力

特定の真の出力（どちらかtrue、1、yes、...）、または特定の偽出力（false、0、no、...）

例

5, 3, 4        --> yes
3, 5, 4        --> yes
12, 37, 35     --> yes
21, 38, 50     --> no
210, 308, 250  --> no

ルール

• 入力と出力は、任意の便利な形式で指定できます。
• 提出する際には、true値とfalse値を明記してください。
• 負の値または無効なエッジトリプルを処理する必要はありません
• 完全なプログラムまたは機能のいずれかが受け入れられます。関数の場合、出力する代わりに出力を返すことができます。
• 可能であれば、他の人がコードを試すことができるように、オンラインテスト環境へのリンクを含めてください！
• 標準的な抜け穴は禁止されています。
• これはコードゴルフなので、通常のゴルフルールがすべて適用され、最短のコード（バイト単位）が勝ちます。

ゼリー、5 バイト

²µSHe

オンラインでお試しください！

技術面での注意：バイトはJellyコードページでカウントされます。

説明：

²µSHe  Main link.
²      Square each number.
 µ     With the new list,
  S    calculate its sum,
   H   and halve it.
    e  Check if the result exists in the new list (squared input)

問題は3つの数字を与えられてa, b, c、そのような順列があるかどうか尋ねることと同等ですa² + b² = c²。これは(a² + b² + c²) ÷ 2がの1つであるかどうかに等しいa², b² or c²ため、プログラムはそれをチェックするだけです。

Python 2、37バイト

a,b,c=sorted(input())
1/(a*a+b*b-c*c)

オンラインでお試しください！

-2 FlipTackに感謝します。
-1 Craig Gidneyに感謝します。

終了コードを介した出力（0= false、1= true）。

Java 8、44バイト

(a,b,c)->(a*=a)+(b*=b)==(c*=c)|a+c==b|b+c==a

説明：

ここで試してみてください。

(a,b,c)->                // Method with three integer parameters and boolean return-type
  (a*=a)+(b*=b)==(c*=c)  //  Return if `a*a + b*b == c*c`
  |a+c==b                //  or `a*a + c*c == b*b`
  |b+c==a                //  or `b*b + c*c == a*a`
                         // End of method (implicit / single-line return-statement)

JavaScript（ES6）、43 41 40バイト

1バイトを保存し、@ Neilのおかげでバグを修正しました

入力を3つの整数の配列として受け取ります。true直角およびfalseその他の場合に戻ります。

a=>a.some(n=>Math.hypot(...a,...a)==n*2)

let f =

a=>a.some(n=>Math.hypot(...a,...a)==n*2)

console.log(f([5, 3, 4     ])) //  --> yes
console.log(f([3, 5, 4     ])) //  --> yes
console.log(f([12, 37, 35  ])) //  --> yes
console.log(f([21, 38, 5   ])) //  --> no
console.log(f([210, 308, 15])) //  --> no

オリジナルバージョン、44バイト

入力を3つの整数として受け取ります。1直角および0その他の場合に戻ります。

(a,b,c)=>(a*=a)+(b*=b)==(c*=c)|a+c==b|b+c==a

テストケース

let f =

(a,b,c)=>(a*=a)+(b*=b)==(c*=c)|a+c==b|b+c==a

console.log(f(5, 3, 4     )) //  --> yes
console.log(f(3, 5, 4     )) //  --> yes
console.log(f(12, 37, 35  )) //  --> yes
console.log(f(21, 38, 5   )) //  --> no
console.log(f(210, 308, 15)) //  --> no

Python 3、37バイト

lambda*l:sum(x*x/2for x in l)**.5in l

オンラインでお試しください！

大きな入力でフロート精度の問題が発生する可能性があります。

三角、57バイト

私はまだこの言語で見たことがなく、試してみるのが適切だと思われました。最初に頭を動かさなければならなかったので、少し時間がかかりました。

,$\:$:*/%*$"`=P:pp.0"*>/>-`:S!>/U+<U"g+..>p`S:U/U"p`!g<>/

オンラインでお試しください！

これは、次の三角形に展開されます。

          ,
         $ \
        : $ :
       * / % *
      $ " ` = P
     : p p . 0 "
    * > / > - ` :
   S ! > / U + < U
  " g + . . > p ` S
 : U / U " p ` ! g <
> /

パスはかなり複雑ですが、私がやったことを説明しようと思います。方向ポインターをスキップします。ほとんどのコードはスタック操作です。

• $:* 最初の入力を二乗します。
• $:* 2番目の入力を2乗します。
• S":Ug! 2番目の値が最初の値より大きいかどうかをテストします。
  • p"最初との真のスワップ。
  • false p何もしない。
• $:* 3番目の入力を2乗します。
• P":USg! 3番目の値が前の値よりも大きいかどうかをテストします。
  • p+U-現在のスタックを真に合計し、保存されている3番目の値を取り去る
  • p"U+-最小合計と3番目に格納され、最大から減算する偽
• 0=% ゼロに等しいかどうかをテストし、結果を出力します。

Haskell（33 32 31バイト）

(\x->(sum x)/2`elem`x).map(^2)

元のバージョン：

(\x->2*maximum x==sum x).map(^2)

匿名関数。[a、b、c]の形式のリストを取ります。TrueまたはFalseを出力します。

最初のバージョンでは、平方の合計が最大値の2倍であるかどうかをチェックしました。

第二に、二乗和の半分が二乗リストの要素であるかどうかをわずかに改善したバージョンがチェックします。

編集：誤って改行を数えた、H.PWizに感謝

Perl 6、24バイト

{(*²+*²==*²)(|.sort)}

オンラインでお試しください！

*²+*²==*²は、最初の2つの引数の平方和が3番目の引数の平方に等しい場合にtrueを返す匿名関数です。ソートされた入力リストをこの関数に渡し、で引数リストにフラット化し|ます。

R、31 26 30バイト

cat(sum(a<-scan()^2)/max(a)==2)

これはあまり好きではありませんが、短いです。正方形を合計し、最大の正方形で除算します。真実なら2。

以前のバージョン（catおよび@Guiseppeのヒントで修正）

cat(!sort(scan())^2%*%c(1,1,-1))

最後の項目が否定されたソート済み入力の合計を行い、!not を返します。

オンラインでお試しください！

Brain-Flak、68バイト

({({({})({}[()])}{}<>)<>})<>({<(({}){}<>[({})])>(){[()](<{}>)}{}<>})

オンラインでお試しください！

user202729の回答の観察結果を使用します。

 {                      }      for each input number
   {({})({}[()])}{}            compute the square
  (                <>)<>       push onto second stack
(                        )     push sum of squares onto first stack
                          <>   move to second stack

 {                                    }    for each square
   (({}){}<>[({})])                        compute 2 * this square - sum of squares
  <                >(){[()](<{}>)}{}<>     evaluate loop iteration as 1 iff equal
(                                      )   push 1 if any squares matched, 0 otherwise

C（gcc）、49バイト

n(a,b,c){return(a*=a)+(b*=b)-(c*=c)&a+c-b&b+c-a;}

オンラインでお試しください！

Kevin Cruijssensテクニックの改善

有効な三角形の場合は0を返し、そうでない場合はゼロ以外の値を返します

MATL、7バイト

SU&0)s=

オンラインでお試しください！

説明

入力を検討してください[12, 37, 35]。

S     % Implicit input. Sort
      % [12, 35, 37]
U     % Square each entry
      % [144, 1225, 1369]
&0)   % Push last entry and remaining entries
      % STACK: 1369, [144, 1225]
s     % Sum of array
      % STACK: 1369, 1369
=     % Isequal? Implicit display
      % STACK: 1

Python 2、43バイト

lambda a,b,c:(a*a+b*b+c*c)/2in(a*a,b*b,c*c)

オンラインでお試しください！

パイソン2、79の 70 68 62バイト

lambda*l:any(A*A+B*B==C*C for A,B,C in zip(l,l[1:]+l,l[2:]+l))

オンラインでお試しください！

C、 68  54バイト

user202729のソリューションを使用します。

f(a,b,c){return!((a*=a)+(b*=b)-(c*=c)&&a-b+c&&a-b-c);}

14バイトのゴルフをしてくれた@Christophに感謝します！

オンラインでお試しください！

C、85バイト

#define C(a,b,c)if(a*a+b*b==c*c)return 1;
f(a,b,c){C(a,b,c)C(b,c,a)C(c,a,b)return 0;}

オンラインでお試しください！

Japt、8バイト

入力を配列として受け取ります。

m²
ø½*Ux

それを試してみてください

J、10バイト

FrownyFrogのおかげで-6バイト

=`+/@\:~*:

元の答え

(+/@}:={:)@/:~*:

/:正方形を並べ替えて*:から、最初の2つの合計が+/@}:最後に等しいかどうかを確認します{:

オンラインでお試しください！

三角度、 49  31バイト

...)...
..IEO..
.M)2s^.
}Re+=..

オンラインでお試しください！

説明

すべてのTriangularityプログラムには、三角形のパディングが必要です（しゃれを許さない）。つまり、プログラムの最後から数えてi番目の行には、両側にi-1ドット（.）を埋め込む必要があります。ドット三角形を対称的で審美的に快適に保つために、各行は2L-1文字で構成する必要があります。ここで、Lはプログラムの行数です。必要なパディングを構成する文字を削除します。コードの動作は次のとおりです。

)IEOM)2s^}Re+=     Full program. Input: STDIN, Output: STDOUT, either 1 or 0.
)                  Pushes a zero onto the stack.
 IE                Evaluates the input at that index.
   O               Sorts the ToS (Top of the Stack).
    M)2s^}         Runs the block )2s^ on a separate stack, thus squaring each.
          R        Reverse.
           e       Dump the contents separately onto the stack.
            +      Add the top two items.
             =     Check if their sum is equal to the other entry on the stack (c^2).

三角形が三角形で直角かどうかを確認しています...

PowerShell、39バイト

$a,$b,$c=$args|sort;$a*$a+$b*$b-eq$c*$c

オンラインでお試しください！

入力をソートし、$a,$b,$c変数に保存します。次に、ピタゴラスの定理を使用してかどうかを確認しa*a + b*b = c*cます。出力はブール値TrueまたはFalseです。

JavaScript 34バイト（D =なし）

D=(d,[a,b,c]=d.sort())=>a*a+b*b==c*c

console.log(D([5, 3, 4       ])== true)
console.log(D([3, 5, 4       ])== true)
console.log(D([12, 37, 35    ])== true)
console.log(D([21, 38, 5     ])== false)
console.log(D([210, 308, 15  ])== false)

RProgN 2、10バイト

§²2^r]‘\+e

説明した

§²2^r]‘\+e
§           # Sort the input list
 ²2^r       # Square each element in the list.
     ]      # Duplicate it on the reg stack.
      ‘     # Pop the top (largest) element off it
       \+   # Swap it, sum the rest of the list.
         e  # Are they equal?

オンラインでお試しください！

ラケット、64 60バイト

(λ(a b c)(=(+(* a a)(* b b)(* c c))(*(expt(max a b c)2)2)))

オンラインでお試しください！

使い方

テストの場合a^2 + b^2 + c^2の二倍の最大に等しいa^2、b^2とc^2。

#t直角三角形および#f他のすべての入力に対して返します。

• 使用する@xnorの提案のおかげで-4バイトexpt。

05AB1E、6バイト

n{R`+Q

オンラインでお試しください！

ルビー、31バイト

->a{a,b,c=*a.sort;a*a+b*b==c*c}

入力を3つの整数のリストとして受け取ります。他のソリューションからのいくつかのアイデアを使用します。

ジュリア0.6、16バイト

!x=x⋅x∈2x.*x

オンラインでお試しください！

使い方

ましょX = [A、B、C] 。

x⋅xはxとそれ自体の内積であるため、a²+b²+c²を生成します。

2x.*xは2xとxの要素単位の積であるため、[2a²、2b²、2c²]を生成します。

最後に、∈整数a²+b²+c²がベクトル[2a²、2b²、2c²]に属するかどうかをテストします。これは、
a²+b²+c²=2a²またはa²+b²+c²=2b²またはa²+b²+c²=2c²に当てはまります。
b²+c²=a²またはa²+c²=b²またはa²+b²=c²の場合、それ自体は真です。

Java（OpenJDK 8）、68バイト

a->{java.util.Arrays.sort(a);return a[0]*a[0]+a[1]*a[1]==a[2]*a[2];}

オンラインでお試しください！

TI-Basic、13 11 10バイト

max(Ans=R►Pr(min(Ans),median(Ans

任意の順序の入力に対して機能するようになり、同様に短くなりました。@MishaLavrovに感謝

CJam、9

q~$W%~mh=

オンラインで試す

説明：

q~      read and evaluate the input (given as an array)
$W%     sort and reverse the array
~       dump the array on the stack
mh      get the hypotenuse of a right triangle with the given 2 short sides
=       compare with the longer side

パリ/ GP、29 24バイト

f(v)=v~==2*vecmax(v)^2

オンラインでお試しください！

からnorml2(v)への明らかな変更によって5バイトを節約しましたv*v~。

他の答えに触発されました。

これは、3つの座標を持つv行ベクトルまたは列ベクトルでなければなりません。

使用例： f([3,4,5])

もちろん、たとえば、の合理的な辺の長さは無料で取得できますf([29/6, 10/3, 7/2])。

f(v)=部品を数えないと、それは19バイトです。最初の部分も書き込むことができますv->（合計22バイト）。

説明：の3点の座標が場合vありx、yそしてz、その後の製品vとその転置はv~スカラを与えx^2+y^2+^z^2、私たちはその座標の最大値の二倍の正方形に等しいかどうかを確認する必要がありx、y、z。

追加：入力ベクトルに4つの座標がある場合f、ピタゴラスの4倍体に対して同じテストを行います。

MS Excel、49バイト

範囲[A1：C1]から入力を取得し、呼び出しセルに出力する匿名ワークシート関数。

=OR(A1^2+B1^2=C1^2,B1^2+C1^2=A1^2,A1^2+C1^2=B1^2)

オームV2、8つの 6バイト

²DS)Σε

オンラインでお試しください！