m:=0;
for i:=1 to length (a)do
if copy (a,i,1)=(e) then
m:=m+1
writin (m);
Нужно место е поставить точку . Помогу пожалуйста очень нужно

Ответа на этот вопрос пока нет. Попробуйте найти его через форму поиска.

Вас заинтересует