
19.02.2009, 23:22
|
|
Участник форума
Регистрация: 01.08.2008
Сообщений: 239
С нами:
9356016
Репутация:
31
|
|
Всем привет!
Есть задача подсчитать кол-во предложений в тексте.
1. Есть ли что-то готовое на этот счёт?
2. Начала реализовывать вот так:
clrscr;
assign(text, 'text.txt');
reset(text);
while not EOF(text) do
begin
read(text, simb);
write(simb);
if (simb='.')or(simb='!')or(simb='?') then inc(kol);
end;
writeln;
writeln ('Текст состоит из ',kol,' предложений');
readln;
close(text);
Но получается что для более точного подсчёта предложений мне нужно знать что находится перед символами "." "!" "?", а использовать стандартные функции работы с текстом нельзя и массивы тоже.
Подскажите пожалуйста как выйти из данной ситуации?
|
|
|