• помогите составить программу,проверяющею входит ли заданный символ в заданную строку,если входит,то вывести сколько раз

Ответы 1

  • var s:string;i:integer;c:char;beginreadln(s);readln(c);while pos(c,s)<>0 do begininc(i);delete(s,pos(c,s),1);end;writeln(i);end.

  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years