Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
скорее всего 3(не точно)
это у нас прогрессия b1=1
q=1/2
bn=0,001> b1*q^(n-1)
0,001> q^(n-1)
0,001> 0,5^(n-1)
0,0005> 0,5^n
n=11
s11=b1*(1-q^n)/(1-q)=b1*(1-0,5^11)/0,5=1(0,999511718)/0,5=1,999023438
почти равно двум
var
s: string;
z,z1,i: integer;
begin
readln(s);
z: =0;
z1: =0;
for i: =1 to length(s) do
if s[i]='м' then inc(z);
if s[i]='н' then inc(z1);
end;
if z> z1 then writeln('больше букв м');
if z< z1 then writeln('больше букв н');
if z=z1 then writeln('букв м и н равное количество');
end.
Популярные вопросы