Сделать в Pascal ABC ,посчитать сколько раз в данной  строке встречается символ

Сделать в Pascal ABC ,посчитать сколько раз в данной  строке встречается символ
Гость
Ответ(ы) на вопрос:
Гость
var     a: string;     b: char;     i, k: integer; begin     readln(a);     readln(b);     for i := 1 to length(a) do         if a[i] = b then             k := k + 1;     writeln(k); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы