Есть ответ 👍

Информатикаааааааа 7 класс​

232
481
Посмотреть ответы 2

Ответы на вопрос:

Tigeriza
4,5(91 оценок)

шоатшаьвдввишвтвшьыэ

tonplaton
4,6(72 оценок)

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.

Популярно: Информатика