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.

转载于:https://www.cnblogs.com/olahiuj/p/5781239.html