ПОМОГИТЕ ПОЖАЛУЙСТА! ОЧЕНЬ СРОЧНО!!! Дана строка, заканчивающаяся точкой. Подсчитать,...

Question

ПОМОГИТЕ ПОЖАЛУЙСТА! ОЧЕНЬ СРОЧНО!!!
Дана строка, заканчивающаяся точкой. Подсчитать, сколько слов в строке.
язык Паскаль

Answer 1

Var s: string;   
 i :integer;
begin
Read(s);
i:= length(s)-1;
writeln(i);
end.

Comments

нужно подсчитать количество слов