Напишите программу определяющую лежит ли точка а с координатами (xa; ya) на окружности заданного радиуса, над ней или под ней. уравнение окружности: x^2 +y^2=r^2. решите условным оператором, )

If (xa^2+ya^2=R^2) then writeln('Лежит на окружности') else if (xa^2+ya^2<R^2) then writeln('Лежит внутри окружности') else writeln('Лежит вне окружности')