计算面积

计算面积

Time Limit:10000MS Memory Limit:65536K
Total Submit:46 Accepted:34
Case Time Limit:1000MS

Description

　　呆子是一个很聪明的人但也是一个很粗心的人，因此常常会丢三落四。一次老师给呆子留了一个很简单的题目，已知平面上一平行四边形的四个顶点，求这个平行四边形的面积。但粗心的呆子却只记了三个点的坐标，因此呆子现在和郁闷。你现在能帮助呆子计算一下老师留给呆子的平行四边形可能的最大面积是多少吗？

Input

　　首先输入一个整数t表示测试数据的组数（1 =< t <= 30）,接下来的t行，每行三对整数，表示呆子已知的平行四边形的顶点坐标。每对整数x, y(0<=x, y <= 10000)中第一个数表示横坐标，第二个数表示纵坐标。每组输入保证是三个不同的点。

Output

共输出t行，第i行为第i组数据的最大可能面积。
输出结果保留一位小数。如果这样的平行四边形不存在，即求得的面积大小为0则输出Error。

Sample Input

2
1 2 3 4 5 6
17 28 89 67 189 25
Sample Output

Error
6924.0

题解：
叉积：
1.已知：平面上的两点的直角坐标分别为p1(x1,y1)，p2(x2,y2)则
1）该两点相对坐标原点(0,0)的叉积为m=x1*y2-x2*y1
若m>0 则相对坐标原点,点p1在点p2的顺时针方向
若m<0 则相对坐标原点,点p1在点p2的逆时针方向
若m=0 则原点和p1、p2在一条直线上
（2）该两点相对点p0(x0,y0)的叉积为m=(x1-x0)(y2-y0)-(x2-x0)(y1-y0)
若m>0 则相对p0点,点p1在点p2的顺时针方向
若m<0 则相对p0点,点p1在点p2的逆时针方向
若m=0 则p0和p1、p2在一条直线上
2.确定两条连续的有向线段p0p1和p0p2在pl点是向左转还是向右转

(1)计算叉积m=(x1-x0)(y2-y0)-(x2-x0)(y1-y0)
（2）判断m
若m>0 则p1点向左拐
若m<0 则p1点向右拐
若m=0 则点p0、p1、p2在一条直线上

代码：

var
  i,x0,x1,x2,y0,y1,y2,n:longint;
  s:real;
begin
  readln(n);
  for i:=1 to n do
    begin
      readln(x0,y0,x1,y1,x2,y2);
      s:=abs((x1-x0)*(y2-y0)-(x2-x0)*(y1-y0));
      if s=0 then writeln('Error')
      else writeln(s:0:1);
    end;
end.