45

Дана строка в которой слова разделяются одним либо несколькими пробелами.…

09 марта 2023

Дана строка в которой слова разделяются одним либо несколькими пробелами. Определить сколько слов встроке.

категория: информатика



51

Var s: string; i, c: integer; isWord: boolean; begin readln (s); c: =0; isWord: =false; for i: =1 to length (s) do if s[i] <> ' then begin if not isWord then begin isWord: =true; c: =c+1; end; end else isWord: =false; writeln (c); end.

Знаете ответ?


Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...