Склавиатуры вводится слово. подсчитать количество букв е в слове​

LizaIvaskevich LizaIvaskevich    3   08.10.2019 09:14    1

Ответы
poly77 poly77  10.10.2020 04:02

var s:string;

i,k:integer;

BEGIN

readln(s);

k:=0;

for i:=1 to Length(s) do

if (s[i]='е') then

k:=k+1;

writeln(k);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика