您的位置:首页 > 其它

Circle (Standard IO)

2016-07-17 14:14 274 查看
题意/Description:

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

读入/Input:

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

输出/Output:

T行,每行一个整数表示直径和(取下整)。

题解/solution:

输出三个点连起来的周长。

代码/Code:

var
t:longint;
x1,y1,x2,y2,x3,y3:int64;
l1,l2,l3:real;
procedure init;
var
i,j:longint;
begin
readln(t);
for i:=1 to t do
begin
readln(x1,y1,x2,y2,x3,y3);
l1:=sqrt(sqr(x1-x2)+sqr(y1-y2));
l2:=sqrt(sqr(x2-x3)+sqr(y2-y3));
l3:=sqrt(sqr(x1-x3)+sqr(y1-y3));
writeln(trunc(l1+l2+l3));
end;
end;

begin
init;
end.
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签:  Circle Standard IO