Радиус круга, Вычисляем по точкам Опции

[Домовой]

Здравствуйте... еще раз ))
Попалось такое задание:
Даны координаты N точек: (xi, yi), i=1,2,...,N. Найти радиус наименьшего круга с центром в начале координат, внутрь которого попадают все эти точки.
В принципе, честно говоря, понял его только перечитав раз 20, это точно.
Так как я геометрию не любил даже еще со школьной программы.
Для составления програмки не поленился, нашел формулу радиуса с центром в начале координат ))
Сделал сначала элементарную програмульку, где ввобишь координаты 2 точек, а она выводит их радиус:

Код

program okruj;
var
x, y, r, : real;
begin
write('x= ');
readln(x);
write('y= ');
readln(y);
R:=Sqr(x)+Sqr(y);
r:=sqr®;
writeln('radius = ', r:2:0);
readln;
writeln;
end.

У меня вопрос - наверняка кто-то уже встречался с подобного рода задачами.
Как вбить данные в массив - это вроде понятно, но как сложить один радиус... из скажем 5 точек?
т.е. при каждом действии в массиве считать по этой йормуле, а дальше запоминать?
Потом плюсовать?
гмммммммм...
Есть над чем подумать,
прошу помочь.
Пасиб

Специально для кода у нас есть спец. тэг code

Сообщение отредактировано: GoodWind - 16.12.2005 1:42