С клавиатуры вводится последовательность символов до тех пор пока не будет введен пробел...

Question

С клавиатуры вводится последовательность символов до тех пор пока не будет введен пробел требуется найти количество символов "a" во введенной последовательности

Comments

pascal abc или free pascal? и по поводу последовательности они иду сразу одной строчкой или вводится символ потом ентер и так пока не нажмут пробел ?

---

если честно то сама не знаю главное чтоб было сделано

---

А среда выполнения какая ?

---

я в этом полный ноль

---

то есть тебе все равно где лишь бы было?

---

да

---

ну чтоб примерно было сделано

---

если тебе не сложно сделай а то мне на завтра нужно

---

у тебя что нибудь получилось

---

спасибо большое

Answer 1

Написал так.. если введешь пробел сразу он просто выведет количество А = 0....вводится одна строка по Ентеру считает...ну в общем попробуешь..вводи строку на английской расскладке.

Answer 2

Еще один вариант:
var
  n:integer;
  s:string;
begin
while s<>' ' do
  begin
  readln(s);
  if s='a' then n:=n+1
  end;
writeln('Количество а: ',n);
end.