const fi='kt.txt'

fo='kq.out'

var f1,f2:text;

s:string;

i,dem,d:integer;

begin

assign(f1,fi); reset(f1);

assign(f2,fo); rewrite(f2);

readln(f1,s);

d:=length(s);

dem:=0;

for i:=1 to d do 

 if s[i]='e' then inc(dem);

writeln(f2,dem);

close(f1);

close(f2);

end.

ủa cái bài TA này em còn làm đc luôn á ! Anh có vở ghi ở lớp thì xem lại chỗ nào ko hiểu thì hỏi ba má 

\(S=\dfrac{1}{2^2}+\dfrac{1}{\left(2.2\right)^2}+\dfrac{1}{\left(2.3\right)^2}+...+\dfrac{1}{\left(2.10\right)^2}\)

\(=\dfrac{1}{2^2}+\dfrac{1}{2^2.2^2}+\dfrac{1}{2^2.3^2}+...+\dfrac{1}{2^2.10^2}\)

\(=\dfrac{1}{2^2}\left(1+\dfrac{1}{2^2}+\dfrac{1}{3^2}+...+\dfrac{1}{10^2}\right)\)

\(< \dfrac{1}{2^2}\left(1+\dfrac{1}{1.2}+\dfrac{1}{2.3}+...+\dfrac{1}{9.10}\right)\)

\(=\dfrac{1}{4}\left(1+1-\dfrac{1}{2}+\dfrac{1}{2}-\dfrac{1}{3}+...+\dfrac{1}{9}-\dfrac{1}{10}\right)\)

\(=\dfrac{1}{4}\left(2-\dfrac{1}{10}\right)< \dfrac{1}{4}.2=\dfrac{1}{2}\) (đpcm)

C.

C

C

30B 31B 32D 33D 34C 35B 36B 37C 38B 39A 40D 41D 42A 43D 44D 45A 46C 47B 48C 49B 50C 51C 52A 53D 54B 55C 56A 57C 58A 59D 60B