Newton's Method to Compute Sqrt[3]

iter[x_] := (1/2) (x + (3/x));
temp = 2;
Print["First four iterates, first guess is x0 = 2."];
For[i = 1, i ≤4,i++, {
temp = iter[temp];
Print[temp];}]
temp = 2;
Print["Numerical approximations to first four iterates."];
For[i = 1, i ≤ 4,i++, {
temp = iter[temp];
Print[SetAccuracy[N[1.0 temp,25],25]]; }];
Print[SetAccuracy[Sqrt[3.],25]];