Вопрос по информатике:
Вводится последовательность символов, оканчивающаяся точкой. Сосчитать количество слов.В Pascal.
- 08.01.2018 19:07
- Информатика
- remove_red_eye 2212
- thumb_up 45
Ответы и объяснения 1
Var
s,q:string;
i,n,j,m,k,l:longint;
begin
Readln(s);
m:=0;
s:=' '+s+' ';
for i:=1 to length(s) do if s[i]' ' then
begin
if s[i-1]=' ' then l:=i;
if s[i+1]=' ' then
begin
inc(m);
end;
end;
Writeln(m);
end.
- 09.01.2018 03:50
- thumb_up 42
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.