С клавиатуры вводится последовательность символов до тех пор пока не будет введен пробел требуется найти количество символов "a" во введенной последовательности
С клавиатуры вводится последовательность символов до тех пор пока не будет введен пробел требуется найти количество символов "a" во введенной последовательности
Гость
Ответ(ы) на вопрос:
ГостьНаписал так.. если введешь пробел сразу он просто выведет количество А = 0....вводится одна строка по Ентеру считает...ну в общем попробуешь..вводи строку на английской расскладке.
ГостьЕще один вариант:
var
n:integer;
s:string;
begin
while s<>' ' do
begin
readln(s);
if s='a' then n:=n+1
end;
writeln('Количество а: ',n);
end.
Не нашли ответ?
Похожие вопросы