Урок 11 Дата 23.11.2023 Учитель Рогаль Т.В. Составление алгоритмов обработки строковых величин. Анализ текста на наличие различных символов |
Программа, которая определит количество слов в тексте, если между любыми двумя словами ровно один пробел. Предполагается, что в тексте есть хотя бы одно слово.
var st: string;
n, k: integer;
begin
writeln('Введите текст');
readln(st);
n := length(st);
k := 1;
for var i := 1 to n do
begin
if st[i] = ' ' then k := k + 1;
end;
writeln('В тексте ', k, ' слов(-о/-а)');
end.
n, k: integer;
begin
writeln('Введите текст');
readln(st);
n := length(st);
k := 1;
for var i := 1 to n do
begin
if st[i] = ' ' then k := k + 1;
end;
writeln('В тексте ', k, ' слов(-о/-а)');
end.
3. Практическая работа:
Выполните задание:
Пришли результат выполненных упражнений на проверку учителю на e-mail rohal74@mail.ru с обязательным указанием фамилии и класса.
Домашнее задание: §9.1 учебник
Оцените урок, заполнив титульный лист и Вариант 4. На остальных страницах нажимаем Далее до кнопки Отправить.