I am trying to get the answer for the sum to infinity for a geometric series. My output should be 3/2 and a loop should be used. I've done that but it won't work. Please help

Sequence = [1 1/3 1/9 1/27];

FirstTerm = Sequence(1);

CommonRatio = Sequence(2)/Sequence(1);

n = 0;

if (Sequence(2)/Sequence(1)) == (Sequence(end)/Sequence(end-1))

CommonRatio;

for i = 0:1:10000

n = n+1;

Sum2Infinity = FirstTerm * CommonRatio.^n;

end

end

disp(Sum2Infinity)

Answer 1

[Torsten]

Sum2Infinity = 0.0;
for i = 0:1:10000
    Sum2Infinity = Sum2Infinity + FirstTerm * CommonRatio^i;
end

[Mpho]

Thank you for your help.