Составьте программу нахождения количества слов в предложении. Предложение…

Question

34

Составьте программу нахождения количества слов в предложении. Предложение состоит из слов, отделенных друг от друга одним пробелом. Предложение вводится склавиатуры.

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

ответить

в избранное ссылка

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

imar · Accepted Answer

72

imar

09 апреля 2023

Program Task; Var s: String; i, r: Integer; BeginWriteLn ('Введите предложение: '); ReadLn (s); If (Length (s) > 0) And (s[1] <> ') Thenr: =1; For i: =1 To Length (s) DoIf s[i]=' Thenr: =r+1; WriteLn ('Результат: ', r); ReadLn; End.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: