Предмет: Информатика,
автор: irka58
Составить программу, выполняющее следующее задание: дана строка символов. Найти количество слов, начинающихся на букву
≪б≫
Ответы
Автор ответа:
0
//Pascal ABC.NET 3.1 сборка 1219
Var
s:string;
k,i:integer;
begin
k:=0;
readln(s);
var ars:=s.Split;
for i:=0 to ars.Length-1 do
if (ars[i][1]='б') or (ars[i][1]='Б') then inc(k);
writeln(k);
end.
Пример ввода:
Большой бейсбольный мяч
Пример вывода:
2
Var
s:string;
k,i:integer;
begin
k:=0;
readln(s);
var ars:=s.Split;
for i:=0 to ars.Length-1 do
if (ars[i][1]='б') or (ars[i][1]='Б') then inc(k);
writeln(k);
end.
Пример ввода:
Большой бейсбольный мяч
Пример вывода:
2
Автор ответа:
0
а в с++ как сделать
Автор ответа:
0
В задаче что-то сказано про Плюсы?
Автор ответа:
0
извините в вы не знаете как в с++ её сделать
Похожие вопросы
Предмет: Другие предметы,
автор: Margo040801
Предмет: Математика,
автор: haarveeyfn
Предмет: Английский язык,
автор: lol7965
Предмет: Математика,
автор: arinushkinaolg