Задана точка M с координатами (x,y). Определить ее положение относительно окружности радиуса R с центром в начале осей координат.

var x,y,r:real; begin write('x, y: '); readln(x,y); write('R = '); readln(r); if x*x+y*y>r*r  then writeln('точка находится внутри круга')  else if x*x+y*y=r*r         then writeln('Точка находится на окружности')         else writeln('Точка находится вне круга'); end. Пример: x, y: 3 4 R = 5 Точка находится на окружности