Дана строка текста, состоящая из

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

описываются во множестве ['-', '*', '/', ',']. Подсчитайте количество разделителей

в строке. в паскале. строка дана любая

Question

Информатика

Маринка

29 октября, 14:16

Дана строка текста, состоящая из

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

описываются во множестве ['-', '*', '/', ',']. Подсчитайте количество разделителей

в строке. в паскале. строка дана любая

+4

Ответы (1)

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

Кирсан · Answer 1

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.