Дана строка символов.Подсчитать общее кол-во знаков (+,-,*), входящих в эту строку
Дана строка символов.Подсчитать общее кол-во знаков (+,-,*), входящих в эту строку
Гость
Ответ(ы) на вопрос:
Гостьрешение на паскале. var s:string;
i,a,b,c:integer;
begin
readln(s);
for i:=1 to length(s) do
if s[i]='+' then inc(a)
else if s[i]='-' then inc(b)
else if s[i]='*' then inc(c);
write('В этой строке: "+" - ',a,'; "-" - ',b,'; "*" - ',c)
end.
Не нашли ответ?
Похожие вопросы