С клавиатуры вводится строка. Определить, сколько раз в ней встречается символ "d" Паскаль
Var s:string;k,i:integer;beginreadln (s);k:=0;for i:=1 to length(s) doif s[i]=d then k:=k+1;writeln(k);end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
