Question

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

. (точка)
; (точка с запятой)
? (вопросительный знак)

Answer 1

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.