ДОмашняя работа 26-28 октября

 ВЫУЧИТЬ

Пример 5. Дана строка. Написать программу, определяющую, сколько раз в строке встречается буква «а» маленькая, русская.

Для решения задачи достаточно просмотреть каждый символ строки и сравнить его с буквой «а». При наличии совпадения необходимо увеличить на единицу счетчик количества букв «а». 

var s:string; 

       i,k:integer; 
begin 
   read(s); 
   k:=0;
for i:= 1 to length(s)  do if s[i]='а' then k:=k+1; 
write(k); 
end.