Оброботка символьных данных

[N1ghtMare]

Помогите сделать программу, никак не могу сдать зачет( Условие:
Пользователь вводит строку, потом вводит символ. На экране должно высветить количество этих символов в данной строке

[Alex11223]

upd: ой, чот не так прочитал задание.

А проблема-то в чем? Покажите\расскажите что не получается.

[N1ghtMare]

ну мы задаем строку любих символов, потом задаем символ. программа должны посчитать количество этих символом в этой строке. Я просто не могу написать формулу по которой паскаль посчитает эти символы.
Тоесть если строка: "ыва23к23к.....ывававы", а символ "ы" то мне должно выдать результат 3

[Alex11223]

Например, так:

c:=0;
for i:=1 to length(str) do
   if (str[i] = 'ы') then c:=c+1;
вывод c;

[N1ghtMare]

А такой еще вопрос: как вписать вместо "ы" тот символ который мы задаем?

[Alex11223]

Ну так прочитать его в какую-нибудь переменную (с типом char) и вместо 'ы' ее использовать.

[N1ghtMare]

Спасибо большое, очень выручили)