Текст = "level";
Для Индекс = 1 По СтрДлина(Текст) Цикл
    Сообщить("Текст[" + Индекс +
        "] = " + Сред(Текст, Индекс, 1));
КонецЦикла;
//Текст[1] = l
//Текст[2] = e
//Текст[3] = v
//Текст[4] = e
//Текст[5] = l