clear all
K=floor(fzero(@(k) 0.5*(0.4^k)*(0.6^(35-k))-0.5^30, 10)); % max K
allk=nchoosek(35,0);
for i=1:K ;
allk = allk+nchoosek(35,i);
end
disp(allk)
clear all
K=floor(fzero(@(k) 0.5*(0.4^k)*(0.6^(35-k))-0.5^30, 10)); % max K
allk=nchoosek(35,0);
for i=1:K ;
allk = allk+nchoosek(35,i);
end
disp(allk)