Программа получает на вход набор точек на плоскости. Сначала задано количество точек n, затем идет последовательность из n строк, каждая из которых содержит два числа: координаты точки. Величина n не превосходит 100, все исходные координаты – целые числа, не превосходящие 103. Выходные данные Выведите координаты центра тяжести данного множества точек. Ответ необходимо выводить с точностью в 15 значащих цифр.

// PascalABC.NET 3.0, сборка 1128var  n,i:integer;  x,y,xc,yc:double;begin  Write('n='); Read(n);  xc:=0; yc:=0;  for i:=1 to n do begin    Read(x,y);    xc:=xc+x; yc:=yc+y    end;  Writeln('Xc=',xc/n,', Yc=',yc/n)end.Тестовое решение:n=51.16 -3.79.35 05.173 2.2432-4.1 6.77-5 5Xc=1.3166, Yc=2.06264Замечание: если результаты будут иметь большее количество цифр, то в пределах 15 все эти цифры будут показаны.