Circle_纪中1765_乱搞

Description

　　给定三个点（不共线）的坐标，要求以这三个点为圆心做三个圆，圆两两不相交，不包含，问三个圆的直径和最大为多少。

Input

　　第一行为测试数据组数t。接下来t行每行6个数为坐标。

Output

　　T行，每行一个整数表示直径和（取下整）。

题解

本来是没有打算做对的，就直接加三边之和，乱搞一通

然后就这么过了

是的，过了

玄学内容不予讨论

code

var
n:longint;
a,b,c:real;
procedure init;
var
x1,y1,x2,y2,x3,y3:longint;
begin
readln(x1,y1,x2,y2,x3,y3);
a:=sqrt(sqr(x1-x2)+sqr(y1-y2));
b:=sqrt(sqr(x1-x3)+sqr(y1-y3));
c:=sqrt(sqr(x2-x3)+sqr(y2-y3));
end;
begin
readln(n);
while n>0 do
begin
init;
writeln(trunc(a+b+c));
dec(n);
end;
end.