Your image:
img = Import["https://i.sstatic.net/i050B.png"];
Here is the circle's radius and center:
ComponentMeasurements[SelectComponents[ColorNegate[Dilation[
Binarize[img,crcl .6],= 3]]ComponentMeasurements[RegionBinarize[Dilation[img, "EnclosingComponentCount"3], #
== 1 &] {{320,
240}}, 0.3], {"Centroid", "EquivalentDiskRadius"}]]; // AbsoluteTiming
crcl
{1 -> {{284.632, 241.92}, 111.476}}
{0.126007, Null} {1 -> {{284.448, 241.873}, 109.256}}
With AbsoluteTiming
~ 0.2 seconds. And here how precise it is:
Show[img, Graphics[{Red, Thickness[.01], Circle @@@ %[[Allcrcl[[All, 2]]}]]