Діагоналі

Чотири точки A(x₁; y₁), B(x₂; y₂), C(x₃; y₃), D(x₄; y₄) є вершинами паралелограма. Визначити довжину діагоналей і знайти координати точки їх перетину.

Вхідні дані

У 4-х рядках через пропуск задані x та y координати послідовних вершин паралелограма, відповідно точок A, B, C та D. Всі числа по модулю не перевищують 100.

Вихідні дані

У першому рядку вивести через пропуск x та y координати точки O, у другому - довжину діагоналі AC і через пропуск - BD. Результати вивести з точністю до тисячних.

program diagonali;

var a,b : array [1..4] of integer;

d1,d2 : real;

i,k : byte;

BEGIN

for i:=1 to 4 do

readln (a[i],b[i]);

k:=0;

for i:=1 to 4 do

if (abs(a[i])<=100) and (abs(b[i])<=100) then k:=k+1;

if k= 4 then begin

d1:=(a[1]+a[3])/2;

d2:=(b[1]+b[3])/2;

writeln (d1:0:3,' ',d2:0:3);

d1:=sqrt(sqr(a[3]-a[1])+sqr(b[3]-b[1]));

d2:=sqrt(sqr(a[4]-a[2])+sqr(b[4]-b[2]));

writeln (d1:0:3,' ',d2:0:3);

end else writeln ('Error');

END.