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

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.

Comments

в строчку

---

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

---

тогда точка ненужна если вы будете записывать данные в строчу а потом нажмете 'enter' для ввода информации

---

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

---

Все

---

спасибо