% Lösning till uppgift Sauer 1.2.15
% Joar Bagge 2016-11-04

clear
format long

gA = @(x) 4*x/5 + 1/x;
gB = @(x) x/2 + 5/(2*x);
gC = @(x) (x+5)/(x+1);

% Testa 10 iterationer av (A)
x = 1;
for n=1:10
  x = gA(x);
  % skriv ut iterationsvärde och absolutfel
  disp([x, abs(x-sqrt(5))])
end
disp('==============')

% Testa 10 iterationer av (B)
x = 1;
for n=1:10
  x = gB(x);
  % skriv ut iterationsvärde och absolutfel
  disp([x, abs(x-sqrt(5))])
end
disp('==============')

% Testa 10 iterationer av (C)
x = 1;
for n=1:10
  x = gC(x);
  % skriv ut iterationsvärde och absolutfel
  disp([x, abs(x-sqrt(5))])
end
