Имя: Пароль:
1C
1С v8
разобрать слово или строку по буквам
Ø (Волшебник 18.07.2017 18:58)
0 ittaxi
 
18.07.17
16:16
Например "правило" как разбить его
п
р
а
в
и
л
о
слово может быть любым.
1 vicof
 
18.07.17
16:17
В цикле
2 Волшебник
 
модератор
18.07.17
16:17
Провести замену по регулярному выражению.
"буква" заменить на "буква + Символы.ПС"
3 vicof
 
18.07.17
16:17
Цикл может быть любым
4 Вафель
 
18.07.17
16:19
стрразделить
5 ittaxi
 
18.07.17
16:22
(4) разделителя нет просто слово без пробелов
6 Diman_Kr
 
18.07.17
16:25
Для сч=1 по длинастр(слово) цикл
буква=лев(Слово,1);
Слово=Сред(прав(длинастр(слово)-1));
КонецЦикла;
7 Волшебник
 
модератор
18.07.17
16:27
8 ittaxi
 
18.07.17
16:31
(6) Форма.Форма(239,36)}: Ожидается символ ','
        Слово=Сред(прав(длинастр(слово)-1<<?>>)); (Проверка: Сервер)
9 Diman_Kr
 
18.07.17
16:35
Ну епа мать, я ж на вскидку писал

Для сч=1 по длинастр(слово) цикл
буква=лев(Слово,1);
Слово=Прав(длинастр(слово)-1);
КонецЦикла;
10 Naf2017
 
18.07.17
16:35
МассивБукв = Новый Массив;
Для сч=1 по длинастр(слово) цикл
  буква=Сред(Слово,сч,1);
  МассивБукв.Добавить(буква);
КонецЦикла;
11 Волшебник
 
модератор
18.07.17
16:36
(9) недостаточно параметров функции Прав
гы-гы
12 Волшебник
 
модератор
18.07.17
16:36
(10) как это пошло...
13 Naf2017
 
18.07.17
16:37
(9)

Для сч=1 по длинастр(слово) цикл
  буква=лев(Слово,1);
  Слово=Сред(слово,2);
КонецЦикла;
14 Diman_Kr
 
18.07.17
16:37
(11) Знающие поймут.
15 Diman_Kr
 
18.07.17
16:38
+(3) Цикл может быть любым
16 Масянька
 
18.07.17
16:38
(0) ТКВ - зачем?
17 ittaxi
 
18.07.17
16:45
(9) Форма.Форма.Форма(240,31)}: Ожидается символ ','
        Слово=Прав(длинастр(слово)-1<<?>>); (Проверка: Сервер)
18 Lama12
 
18.07.17
16:48
(0) Хм... экзамены вроде кончились. Откуда такие вопросы пошли?
19 Lama12
 
18.07.17
16:48
(17) Поверь. Программирование не твое.
20 ittaxi
 
18.07.17
17:05
(10) спасибо получилось
слово = "правило";  
        МассивБукв = Новый Массив;
        Для сч=1 по СтрДлина(слово) цикл
          буква=Сред(слово,сч,1);
          МассивБукв.Добавить(буква);
        КонецЦикла;

        Для Каждого Символ Из МассивБукв Цикл
        Сообщить(Символ);
        КонецЦикла;

всем спасибо.
особенно (19)
21 Denis_CFO
 
18.07.17
18:28
(20) точно не твоё.... зачем дважды циклить одно и то же??? дважды благодари (19)