Koordinaty to4ek v Pascal

[chapotai]

На плоскости заданы десять точек M1(x1,y1), M2(x2,y2), ... , M10(x10,y10).
Вывести на экран координаты точек, лежащих в круге радиусом r с центром в точке M0(x0,y0).
Знающие, помогите с текстом задачи...
В цикле будет условие вроде такое

 
for i:=1 to 10 do
if (abs(x[i])<=r) and (abs(y[i]<=r) 
then writeln ('M,i'(',x[i],',',y[i],')');

[Serge_Bliznykov]

нет, условие проверки будет не такое!

расстояние от точки находится как корень квадратный из суммы квадратов разностей координах X и Y
примерно так:

for i:=1 to 10 do
if sqrt(sqr(x[i]-x0)+sqr(y[i]-y0))<=r
then writeln ('M,i'(',x[i],',',y[i],')');