
Евтихиевич
6 год назад
Дана строка, состоящая из русских слов, разделенных пробелами (одним или несколькими). Найти количество слов в строке.
Объясните принцип решения данной задачи.Какой алгоритм действий нужен?
ОТВЕТЫ

Uvarov
Aug 6, 2019
Только для версии PascalABC.Net 3.2
Коротко и эффектно!
begin
Writeln(Количество слов равно ,ReadlnString(Вводите:).ToWords.Count)
end.
Пример
Вводите: Карл у Клары украл кораллы.
Количество слов равно 5
VBA MS Excel 2003
Sub aaa()
a = Split(InputBox("Вводите строку"), " ")
k = 0
For Each e In a
If e lt;gt; "" Then k = k + 1
Next
MsgBox "Количество слов равно" + Str(k)
End Sub
Коротко и эффектно!
begin
Writeln(Количество слов равно ,ReadlnString(Вводите:).ToWords.Count)
end.
Пример
Вводите: Карл у Клары украл кораллы.
Количество слов равно 5
VBA MS Excel 2003
Sub aaa()
a = Split(InputBox("Вводите строку"), " ")
k = 0
For Each e In a
If e lt;gt; "" Then k = k + 1
Next
MsgBox "Количество слов равно" + Str(k)
End Sub
13
Смежные вопросы: