С клавиатуры вводят слово и символ.Составте программу которая:подсчитывает количество вхождений заданного символа
Ответы:
07-07-2017 03:07
var a:string; b:char; i,sum:integer; begin readln(a,b); for i:=1 to length(a) do begin if pos(b,a)<>0 then begin sum:=sum+1; delete(a,1,pos(b,a)); end; end; writeln(sum); end.
⭐⭐⭐⭐⭐ Лучший ответ на вопрос «С клавиатуры вводят слово и символ.Составте программу которая:подсчитывает количество вхождений заданного символа» от пользователя Арсен Ледков в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.
Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!