работа со строками в 1С

[Anna91]

Правильно ли я делаю,

при помощи оператора Если ,,,, Тогда ,,,,. Иначе вывести все буквы "Ы" из строчки А

А = "АППРРОРДГШЫЕПРМОЛОЛЖДЫАПВ АОРЛДМИТЬТЫЫЕГГДЖЩЗХГШЩ" ;
Б = "Ы";

Если Найти (А, "Ы") > 0 Тогда
Сообщить (Б);
Иначе
КонецЕсли;

Спасибо за помощь!

[Anna91]

условия немного другие :

посчитать количество символов найденных по условию, оператором Если,,, Тогда,,, Иначе,,,,

Сейчас он находит только буквы, а необходимо посчитать количество найденных букв.

А = "АППРРОРДГШЫЕПРМОЛОЛЖДЫАПР ВАОРЛДМИТЬТЫЫЕГГДЖЩЗХГШЩ";
Б = "Ы";

Для Н=1 по СтрДлина(А) Цикл
Строка=Сред(А,Н,1);

Если Строка = Б Тогда
Сообщить("Найдена нужная буква: " +Б);
Иначе

КонецЕсли;

КонецЦикла;

Спасибо!

[dghgvkhjk]

Примерно так:

А = "АППРРОРДГШЫЕПРМОЛОЛЖДЫАП� � �ВАОРЛДМИТЬТЫЫЕГГДЖЩЗХГШ� �" ;
Б = "Ы";
Счетчик = 0;

Для Н=1 по СтрДлина(А) Цикл
Строка=Сред(А,Н,1);

Если Строка = Б Тогда
Сообщить("Найдена нужная буква: " +Б);
Счетчик = Счетчик +1;
Иначе

КонецЕсли;

КонецЦикла;
Сообщить("Кол-во букв Ы = "Счетчик);