Помогите с задачей, со строками

[AleNa666]

не могу составить программу, определяющую, содержится ли буква "е" в предложении пользователя...помогите

[alex_fcsm]

readln(s);
if pos('e',s)<>0 then

[AleNa666]

а после then что нужно написать, чтобы он показывал число этих "е"?

[alex_fcsm]

readln;
n:=0;
for i:=1 to length(s) do
 if s[i]='e' then inc(n);
writeln(n);

[AleNa666]

Спасибо, большое, ураааа