Пусть Sn = 8Σ (1 / ((4κ-3) (4κ-1))). Известно, что lim Sn, когда n стремится к инфинитиву, равен pi. Напишите функцию [sn, n] = mySumPi (tol), которая выводит Sn и n для наименьшего n, такого, что абсолютное значение Sn-pi
Я написал следующий код, но кажется, что он не работает.
function [sn,n] = mySumPi(tol)
%[sn,n] = mySumPi(tol)
%lim as n approaches infinity is pi
% n is the smallest numbers such that the abs(sn-pi) <tol
count = 0;
sn=0
while abs(sn-pi) >= tol
sn = sn + (8*sn)*(((4*n)-3)*((4*n)-1))
count = count+1;
n = count - 1;
end
end