Имя: Пароль:
1C
 
первая буква слова
0 kirillsas
 
23.09.10
14:54
подскажите как получить первую букву слова средствами языка 1с?
1 zak555
 
23.09.10
14:54
Лев(Стр,1)
2 mooo
 
23.09.10
14:54
ЛЕВ(Стр, 1)
3 Darky
 
23.09.10
14:54
Лев("Слово",1)
4 Mitriy
 
23.09.10
14:55
Лев(СокрЛП(Слово), 1)
5 Mitriy
 
23.09.10
14:55
я круче...
6 Волшебник
 
23.09.10
14:56
ПерваяБуква = Сред(Слово,1,1);
7 zak555
 
23.09.10
14:57
Прав(Стр,СтрДлина(Стр))
8 Волшебник
 
23.09.10
14:58
(7) Не работает
9 zak555
 
23.09.10
15:01
(8) поспешил =)
10 НЕА123
 
23.09.10
15:02
Символ(КодСимвола(Стр,1))
11 Ненавижу 1С
 
гуру
23.09.10
15:03
а так:

Функция ЭтоБуква(Буква)
   Возврат (Буква<>ВРег(Буква)) или (Буква<>НРег(Буква));      
КонецФункции

Буква=Неопределено;
Для й=1 По СтрДлина(Слово) Цикл
   ВозможнаяБуква = Сред(Слово,й,1);
   Если ЭтоБуква(ВозможнаяБуква) Тогда
       Буква = ВозможнаяБуква;
       Прервать;
   КонецЕсли;
КонецЦикла;
12 Дикообразко
 
23.09.10
15:04
(11) приз твой
13 Mitriy
 
23.09.10
15:04
(11) о... это интересно...
14 Ayvengo
 
23.09.10
15:04
Аж приятно почитать :D
15 luns
 
23.09.10
15:06
писать не буду, лень, но методику расскажу.

1. Разложить строку с массив.
2. Массив преобразовать в ТЗ
3. ТЗ передать в запрос.
4. выбрать ПЕРВЫЕ 1

))
16 stangen
 
23.09.10
15:09
ВЫБРАТЬ
   ПОДСТРОКА("Слово", 1, 1) КАК ПерваяБуква
17 mooo
 
23.09.10
15:11
(0) ты удовлетворен? ))
18 kirillsas
 
23.09.10
15:13
Более чем))) Всем спасибо за помощь:)
19 Поручик
 
23.09.10
15:30
Про чётное/нечётное число больше алгоритмов написали. А тут фантазия иссякла на 16 посте.
20 luns
 
23.09.10
15:33
(19) а твой вариант где?
Кaк может человек ожидaть, что его мольбaм о снисхождении ответит тот, кто превыше, когдa сaм он откaзывaет в милосердии тем, кто ниже его? Петр Трубецкой