Question

Составить программу для решения следующей задачи: Дана последовательность символов,концом которой является точка.Подсчитать,сколько в этой последовательности букв а. Pascal.Срочно плиз помогите!!!

Answer 1

program test;
var k,i:integer;s:string;
begin
readln(s);
for i:=1 to (length(s)-1) do // -1 это точка
if s[i]='a' then k:=k+1;
writeln(k);
end.

Answer 2

сейчас исправлю

Answer 3

Это по условию нужно. К примеру xzafjhba3%. a=2

Answer 4

Все

Answer 5

спасибо