中心の座標と2つの円の半径を指定して、重なるかどうかの真理値を出力します。

入力

• 入力は、STDINまたは同等の関数引数を介して取得できますが、変数としては取得できません。それらを単一の変数（リスト、文字列など）として、または複数の入力/引数として、任意の順序で受け取ることができます。

• 入力は6つのフロートになります。これらのフロートは、小数点以下3桁までです。座標は正でも負でもかまいません。半径は正になります。

出力

• 出力は、STDOUTまたは関数戻りを介して行うことができます。

• プログラムには、正確な2つの出力が必要です。1つはTrue値（円はオーバーラップ）で、もう1つはFalse出力（オーバーラップしません）です。

テストケース

（入力は[(x1, y1, r1), (x2, y2, r2)]テストケースのタプルのリストとして提供されます。任意の形式で入力を取得できます）

本当

[(5.86, 3.92, 1.670), (11.8, 2.98, 4.571)]
[(8.26, -2.72, 2.488), (4.59, -2.97, 1.345)]
[(9.32, -7.77, 2.8), (6.21, -8.51, 0.4)]

偽

[(4.59, -2.97, 1.345), (11.8, 2.98, 4.571)]
[(9.32, -7.77, 2.8), (4.59, -2.97, 1.345)]
[(5.86, 3.92, 1.670), (6.21, -8.51, 0.4)]

これはCode Golfで、バイト単位の最短回答が勝ちです。

ゼリー、5バイト

IA<S}

最初の引数として2つの複素数（中心）を取り、2番目の引数として2つの実数（半径）を取ります。

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

使い方

IA<S}  Main link.
       Left argument:  [x1 + iy1, x2 + iy2]
       Right argument: [r1, r2]

I      Increments; yield (x2 - x1) + i(y2 - y1).
 A     Absolute value; yield √((x2 - x1)² + (y2 - y1)²).
   S}  Take the sum of the right argument, yielding r1 + r2.
  <    Compare the results.

JavaScript（ES6）、38バイト

入力を6つの異なる変数x1、y1、r1、x2、y2、r2として受け取ります。

(x,y,r,X,Y,R)=>Math.hypot(x-X,y-Y)<r+R

テストケース

let f =

(x,y,r,X,Y,R)=>Math.hypot(x-X,y-Y)<r+R

// True
console.log(f(5.86, 3.92, 1.670, 11.8, 2.98, 4.571))
console.log(f(8.26, -2.72, 2.488, 4.59, -2.97, 1.345))
console.log(f(9.32, -7.77, 2.8, 6.21, -8.51, 0.4))

// False
console.log(f(4.59, -2.97, 1.345, 11.8, 2.98, 4.571))
console.log(f(9.32, -7.77, 2.8, 4.59, -2.97, 1.345))
console.log(f(5.86, 3.92, 1.670, 6.21, -8.51, 0.4))

Pyth、5バイト

gsE.a

入力形式：

[x1, y1], [x2, y2]
r1, r2

オンラインで試す

使い方

     Q   autoinitialized to eval(input())
   .a    L2 norm of vector difference of Q[0] and Q[1]
gsE      sum(eval(input()) >= that

MATL、5バイト

ZPis<

入力形式は次のとおりです。

[x1, y1]
[x2, y2]
[r1, r2]

オンラインでお試しください！または、すべてのテストケースを確認します。

使い方

ZP   % Take two vectors as input. Push their Euclidean distance
i    % Input the vector of radii
s    % Sum of vector
<    % Less than?

R、39バイト

function(k,r)dist(matrix(k,2,2))<sum(r)

入力k=c(x1,x2,y1,y2)を受け取りますr=c(r1,r2); FALSE接線の円を返します。

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

27バイト：

function(m,r)dist(m)<sum(r)

入力を、行として指定された円の中心と半径のベクトルを持つ行列として受け取ります。

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

Python、40バイト

lambda x,y,r,X,Y,R:abs(x-X+(y-Y)*1j)<r+R

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

Pythonの複素数演算を使用して、2つの中心間の距離を計算します。入力ポイントを複素数として直接取ることができないと想定しているため、コードはそれらを次のように表現しますx+y*1j。

Python 3、45バイト

lambda X,Y,R,x,y,r:(X-x)**2+(Y-y)**2<(R+r)**2

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

05AB1E、6バイト

αs--0›

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

-1バイトを使用するa - b > 0代わりに(reverse) b - a < 0

Python 3、45バイト

lambda a,b,c,d,e,f:(a-d)**2+(b-e)**2<(c+f)**2

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

Neil / Step Henのおかげで-8バイト

APL（Dyalog）、10バイト

2つの複素数のリストとしての円の中心のプロンプト、2つの数のリストとしての半径のプロンプト

(+/⎕)>|-/⎕

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

(+/⎕) [is]半径の合計

> より大きい

| の大きさ

-/⎕ センターの違い

Mathematica、16バイト

Norm[#-#2]<+##3&

入力： [{x1, y1}, {x2, y2}, r1, r2]

MathematicaにはRegionIntersection組み込み機能がありますが、それだけで18バイト長です...

組み込みバージョン：

RegionIntersection@##==EmptyRegion@2&

2つのDiskオブジェクトを受け取ります。[Disk[{x1, y1}, r1], Disk[{x2, y2}, r2]]。

Haskell、37 36バイト

(u#v)r x y s=(u-x)^2+(v-y)^2<(r+s)^2

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

-1バイトをありがとう@AndersKaseorg ！

ゼリー、12バイト

I²+⁴I²¤<⁵S²¤

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

-デニスのおかげで2バイト

Java（OpenJDK 8）、38バイト

(a,b,c,x,y,z)->Math.hypot(a-x,b-y)<c+z

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

Java 8、41 38バイト

(x,y,r,X,Y,R)->Math.hypot(x-X,y-Y)<r+R

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

どうやら、JavaにもがありMath.hypot、これは3バイト短くなっています。

編集：この答えは@OlivierGrégoireのJava 8の答えとまったく同じであることに気付いたので、38バイトの答えが好きなら私ではなく彼に賛成してください。

古い回答（41バイト）：

(x,y,r,X,Y,R)->(x-=X)*x+(y-=Y)*y<(r+=R)*r

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

Pyth、15バイト

<sm^-EE2 2^+EE2

入力をx1、x2、y1、y2、r1、r2の順序で受け取ります

テストスイート！

Perl 6、13バイト

*+*>(*-*).abs

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

最初の2つの引数は、いずれかの順序の半径です。3番目と4番目の引数は、いずれかの順序の複素数としての中心の座標です。

タクシー、1582バイト

Go to Post Office:w 1 l 1 r 1 l.Pickup a passenger going to The Babelfishery.Pickup a passenger going to Tom's Trims.Pickup a passenger going to Tom's Trims.Go to Tom's Trims:n.[a]Go to Post Office:s.Pickup a passenger going to The Babelfishery.Go to The Babelfishery:s 1 l 1 r.Pickup a passenger going to What's The Difference.Pickup a passenger going to What's The Difference.Go to What's The Difference:n 5 l.Pickup a passenger going to Cyclone.Go to Cyclone:e 1 r.Pickup a passenger going to Multiplication Station.Pickup a passenger going to Multiplication Station.Go to Multiplication Station:s 1 l 2 r 4 l.Pickup a passenger going to Addition Alley.Go to Tom's Trims:s 1 r 3 r.Pickup a passenger going to The Babelfishery.Switch to plan "b" if no one is waiting.Switch to plan "a".[b]Go to Addition Alley:n 1 r 1 l 3 l 1 l.Pickup a passenger going to Magic Eight.Go to Post Office:n 1 r 1 r 3 r 1 l.Pickup a passenger going to The Babelfishery.Go to The Babelfishery:s 1 l 1 r.Pickup a passenger going to Addition Alley.Pickup a passenger going to Addition Alley.Go to Addition Alley:n 5 l 1 l.Pickup a passenger going to Cyclone.Go to Cyclone:n 1 l 1 l.Pickup a passenger going to Multiplication Station.Pickup a passenger going to Multiplication Station.Go to Multiplication Station:s 1 l 2 r 4 l.Pickup a passenger going to Magic Eight.Go to Magic Eight:s 1 r.Switch to plan "c" if no one is waiting.'1' is waiting at Writer's Depot.[c]'0' is waiting at Writer's Depot.Go to Writer's Depot:w 1 l 2 l.Pickup a passenger going to Post Office.Go to Post Office:n 1 r 2 r 1 l.

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

1重なり合う円の出力。
出力0（接線円を含む）非重複円用。

未ゴルフ/フォーマット済み：

Go to Post Office: west 1st left 1st right 1st left.
Pickup a passenger going to The Babelfishery.
Pickup a passenger going to Tom's Trims.
Pickup a passenger going to Tom's Trims.
Go to Tom's Trims: north.
[a]
Go to Post Office: south.
Pickup a passenger going to The Babelfishery.
Go to The Babelfishery: south 1st left 1st right.
Pickup a passenger going to What's The Difference.
Pickup a passenger going to What's The Difference.
Go to What's The Difference: north 5th left.
Pickup a passenger going to Cyclone.
Go to Cyclone: east 1st right.
Pickup a passenger going to Multiplication Station.
Pickup a passenger going to Multiplication Station.
Go to Multiplication Station: south 1st left 2nd right 4th left.
Pickup a passenger going to Addition Alley.
Go to Tom's Trims: south 1st right 3rd right.
Pickup a passenger going to The Babelfishery.
Switch to plan "b" if no one is waiting.
Switch to plan "a".
[b]
Go to Addition Alley: north 1st right 1st left 3rd left 1st left.
Pickup a passenger going to Magic Eight.
Go to Post Office: north 1st right 1st right 3rd right 1st left.
Pickup a passenger going to The Babelfishery.
Go to The Babelfishery: south 1st left 1st right.
Pickup a passenger going to Addition Alley.
Pickup a passenger going to Addition Alley.
Go to Addition Alley: north 5th left 1st left.
Pickup a passenger going to Cyclone.
Go to Cyclone: north 1st left 1st left.
Pickup a passenger going to Multiplication Station.
Pickup a passenger going to Multiplication Station.
Go to Multiplication Station: south 1st left 2nd right 4th left.
Pickup a passenger going to Magic Eight.
Go to Magic Eight: south 1st right.
Switch to plan "c" if no one is waiting.
'1' is waiting at Writer's Depot.
[c]
'0' is waiting at Writer's Depot.
Go to Writer's Depot: west 1st left 2nd left.
Pickup a passenger going to Post Office.
Go to Post Office: north 1st right 2nd right 1st left.

C＃、50 41バイト

(x,y,r,X,Y,R)=>(x-=X)*x+(y-=Y)*y<(r+=R)*r

@KevinCruijssenのおかげで9バイト節約されました。

Scala、23バイト

@Arnauldに彼のほぼ多声をありがとう答えを。

math.hypot(a-x,b-y)<r+q

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

PostgreSQL、41文字

prepare f(circle,circle)as select $1&&$2;

準備されたステートメント、入力を2つのパラメーターとして受け取ります。 circle表記法で。

サンプル実行：

Tuples only is on.
Output format is unaligned.
psql (9.6.3, server 9.4.8)
Type "help" for help.

psql=# prepare f(circle,circle)as select $1&&$2;
PREPARE

psql=# execute f('5.86, 3.92, 1.670', '11.8, 2.98, 4.571');
t

psql=# execute f('8.26, -2.72, 2.488', '4.59, -2.97, 1.345');
t

psql=# execute f('9.32, -7.77, 2.8', '6.21, -8.51, 0.4');
t

psql=# execute f('4.59, -2.97, 1.345', '11.8, 2.98, 4.571');
f

psql=# execute f('9.32, -7.77, 2.8', '4.59, -2.97, 1.345');
f

psql=# execute f('5.86, 3.92, 1.670', '6.21, -8.51, 0.4');
f

Java、50 38バイト

(x,y,r,X,Y,R)->Math.hypot(x-X,y-Y)<r+R

x86マシンコード（SSE2を使用）、36バイト

; bool CirclesOverlap(double x1, double y1, double r1,
;                     double x2, double y2, double r2);
F2 0F 5C C3        subsd   xmm0, xmm3      ; x1 - x2
F2 0F 5C CC        subsd   xmm1, xmm4      ; y1 - y2
F2 0F 58 D5        addsd   xmm2, xmm5      ; r1 + r2
F2 0F 59 C0        mulsd   xmm0, xmm0      ; (x1 - x2)^2
F2 0F 59 C9        mulsd   xmm1, xmm1      ; (y1 - y2)^2
F2 0F 59 D2        mulsd   xmm2, xmm2      ; (r1 + r2)^2
F2 0F 58 C1        addsd   xmm0, xmm1      ; (x1 - x2)^2 + (y1 - y2)^2
66 0F 2F D0        comisd  xmm2, xmm0
0F 97 C0           seta    al              ; ((r1 + r2)^2) > ((x1 - x2)^2 + (y1 - y2)^2)
C3                 ret

上記の関数は、2つの円（中心点と半径のx座標とy座標）の記述を受け入れ、それらが交差するかどうかを示すブール値を返します。

パラメータがSIMDレジスタで渡されるベクター呼び出し規約を使用します。x86-32および64ビットWindowsでは、これは__vectorcall呼び出し規約です。64ビットUnix / Linux / Gnuでは、これは標準のSystem V AMD64呼び出し規約です。です。

戻り値は、の下位バイトに残ります EAX、すべてのx86呼び出し規約の標準であるようます。

このコードは、SSE2命令セットをサポートしている限り、32ビットと64ビットのx86プロセッサーで同様に機能します。（Intel Pentium 4以降またはAMD Athlon 64以降）ます。

AVXバージョン、まだ36バイト

AVXをターゲットにしている場合は、おそらく命令にVEXプレフィックスを追加する必要があります。これはバイトカウントを変更しません。命令のエンコードに使用される実際のバイトのみ：

; bool CirclesOverlap(double x1, double y1, double r1,
;                     double x2, double y2, double r2);
C5 FB 5C C3      vsubsd   xmm0, xmm0, xmm3   ; x1 - x2
C5 F3 5C CC      vsubsd   xmm1, xmm1, xmm4   ; y1 - y2
C5 EB 58 D5      vaddsd   xmm2, xmm2, xmm5   ; r1 + r2
C5 FB 59 C0      vmulsd   xmm0, xmm0, xmm0   ; (x1 - x2)^2
C5 F3 59 C9      vmulsd   xmm1, xmm1, xmm1   ; (y1 - y2)^2
C5 EB 59 D2      vmulsd   xmm2, xmm2, xmm2   ; (r1 + r2)^2
C5 FB 58 C1      vaddsd   xmm0, xmm0, xmm1   ; (x1 - x2)^2 + (y1 - y2)^2
C5 F9 2F D0      vcomisd  xmm2, xmm0
0F 97 C0         seta     al                 ; ((r1 + r2)^2) > ((x1 - x2)^2 + (y1 - y2)^2)
C3               ret

AVX命令には3つのオペランドを使用するという利点があり、非破壊的な操作を行うことができますが、それでもここでコードを圧縮するのに役立ちません。ただし、VEXプレフィックスを含む命令と含まない命令を混在させると、最適でないコードが生成される可能性があるため、一般に、AVXをターゲットにしている場合はすべての AVX命令を使用する必要がありますが、この場合、バイトカウントさえ損ないません。

05AB1E、10バイト

-¨nOt²¹+θ‹

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

PHP、66バイト

<?php $i=$argv;echo hypot($i[1]-$i[4],$i[2]-$i[5])<$i[3]+$i[6]?:0;

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

入力を6つのコマンドラインパラメーター引数として受け取り、円が重なる場合は1、それ以外の場合は0を出力して、コマンドラインから実行します。

ジュリア0.6.0（46バイト）

a->((a[1]-a[2])^2+(a[3]-a[4])^2<(a[5]+a[6])^2)

Clojure、68バイト

#(<(+(*(- %4 %)(- %4 %))(*(- %5 %2)(- %5 %2)))(*(+ %6 %3)(+ %6 %3)))

6つの引数を取ります：x1、y1、r1、x2、y2、r2。trueまたはfalseを返します。

悲しいことに、Clojureにはpow何らかの機能がありません。多くのバイトがかかります。

実際には、8バイト

-)-(h@+>

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

説明：

-)-(h@+>  (implicit input: [y1, y2, x1, x2, r1, r2])
-         y2-y1 ([y2-y1, x1, x2, r1, r2])
 )-       move to bottom, x1-x2 ([x1-x2, r1, r2, y2-y1])
   (h     move from bottom, Euclidean norm ([sqrt((y2-y1)**2+(x2-x1)**2), r1, r2])
     @+   r1+r2 ([r1+r2, norm])
       >  is r1+r2 greater than norm?

R（+ pryr）、31バイト

pryr::f(sum((x-y)^2)^.5<sum(r))

関数に評価する

function (x, y, z) 
sum((x - y)^2)^0.5 < sum(z)

x円1の座標はどこですかy、円2の座標はz半径は。

ピタゴラスを使用して2つの中心間の距離を計算し、その距離が半径の合計よりも小さいかどうかをテストします。

Rのベクトル化を使用して、(x1-x2)^2とを同時に計算し(y1-y2)^2ます。これらは合計され、平方根になります。

Go、93バイト

package q
import c "math/cmplx"
func o(a,b complex128,r,R float64)bool{return c.Abs(b-a)<r+R}

組み込みのアルゴリズムを使用することを除いて、他のいくつかの回答と同じ、かなり単純なアルゴリズム complex型を math / cmplx.Abs（）を呼び出す。

半径を複素数として扱うことは役に立ちません。float64へのキャストは、変数宣言が保存するよりも多くのバイトを追加するからです（できないfloat64 < complex128）。

オンラインでお試しください！テストケースを含み、ライブラリの代わりにパッケージmainを使用します。