Напишите программу, которая считает количество - вопрос №9007607 от ramil161 30.03.2020 17:22

Question

Информатика: Напишите программу, которая считает количество предложений во введенной строке и выводит его. предложение может заканчиваться на: . (точка) ; (точка с запятой) ? (вопросительный знак)

ramil161 · Answer

PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018
Внимание! Если программа не работает, обновите версию!

begin
var (s,k):=(ReadlnString,0);
for var i:=1 to s.Length do
if s[i] in ['.',';','?'] then k+=1;
Writeln('Количество предложений равно ',k)
end.