Работа 3.8 Упр.2 ГДЗ Семакин 10 класс (Информатика)
Дана строка, содержащая английский текст. Найти количество слов, начинающихся с буквы «b».
Нужно просмотреть строку посимвольно и выделять слова, разделённые пробелами. Для каждого слова проверяем его первую букву: если она равна b, увеличиваем счётчик.
Алгоритм работы программы:
- считать строку s;
- установить указатель p := 1 и счётчик слов nb := 0;
- пропускать пробелы;
- если текущий символ — b, увеличить nb;
- перейти к следующему слову;
- повторять, пока не закончится строка.
var s: string;
p, nb: integer;
begin
write(‘text? ‘);
readln(s);
p := 1;
nb := 0;
while p <= length(s) do begin
while (s[p] = ‘ ‘) and (p <= length(s)) do inc(p);
if (p <= length(s)) and (s[p] = ‘b’) then inc(nb);
while (s[p] <> ‘ ‘) and (p <= length(s)) do inc(p);
end;
write(‘num words: ‘, nb);
end.
Программа считает количество слов, начинающихся с буквы b, и выводит полученный результат.
Ответ: программа находит число слов, начинающихся с буквы b.

