Посчитать количество восклицательных предложений в тексте длины не более 255 символов. (программа Паскаль)

Ангелок1105 Ангелок1105    3   16.04.2019 23:00    2

Ответы
radchenkoalink radchenkoalink  16.04.2019 23:00
var s: String; i, k: Integer;
begin
  ReadLn(s);
  for i:=2 to Length(s) do
    if (s[i]='!') and (s[i-1]<>'!') then Inc(k);
  WriteLn(k);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Другие предметы