Дана строка текста, состоящая из слов. Слова отделяются друг от друга одним из специальных символов, которые описываются во множестве [‘-’, ‘*’, ‘/’, ‘,’]. Подсчитайте количество разделителей в строке.в паскале.строка дана любая

Дана строка текста, состоящая из слов. Слова отделяются друг от друга одним из специальных символов, которые описываются во множестве [‘-’, ‘*’, ‘/’, ‘,’]. Подсчитайте количество разделителей в строке.в паскале.строка дана любая
Гость
Ответ(ы) на вопрос:
Гость
var s:string; i,a:longint; begin readln(s); for i:=1 to length(s) do if (s[i]='-') or (s[i]='*') or (s[i]='/') or (s[i]=',') then inc(a); writeln(a); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы