добрый вечер. Есть строка вида 00000453099, нужно удалить нули вначале строки. Количество нулей неизвестно, кто какой алгоритм подскажет?

мда) СтрЗаменить ?

в типовых же был механизм. что то аля "ВывестиНомерДокументаДляПечати". Он как раз и обрезал нули в начале.

Обходи циклом строку с начала, пока есть ноль и отрежь в тот момент, когда в начале останется не ноль.

(1) нули могут быть в середине искомого номера

(1) нули в середине тоже заменятся

Ну тады цыклами)

Функция УдалитьПовторяющиесяСимволы(Знач Строка, Знач Символ, Знач Режим = "Слева") Экспорт
    
    Если ВРег(Режим) = "СЛЕВА" Тогда
        
        Пока Лев(Строка, 1)= Символ Цикл
            
            Строка = Сред(Строка, 2);
            
        КонецЦикла;
        
    ИначеЕсли ВРег(Режим) = "СПРАВА" Тогда
        
        Пока Прав(Строка, 1)= Символ Цикл
            
            Строка = Лев(Строка, СтрДлина(Строка) - 1);
            
        КонецЦикла;
        
    КонецЕсли;
    
    Возврат Строка;
КонецФункции

как-то так ? )

Пока Лев(Стр, 1) = "0" Цикл
  Стр = Прав(Стр, СтрДлина(Стр) - 1);
КонецЦикла;

Йо, все бухают, а ты тут программишь)

(8) В типовых все сделано за вас, меьсе

(10) Не мешай - я изобрел велосипед! ;)

(0) Число("1"+Стр)- Pow(10, СтрДлина(Стр)) - не проверял...

(8) спасибо!

(12) ого!)

(13) неблагодарный, в (7) уже все было

(15) в 8-ом короче)

(15) циклы зло. Зри в корень :) (12)

(16) И че? в (7) универсально, любые символы, справа/слева, а вы все авнокодите заплатками по случаю

(17) А может тогда Стр = Строка(Число(Стр)) ?

(17) я ваще тут бухаю, нафиг твой корень =)

(19) в номере могут встречаться буквы, точки...

(21)Прикольное уточнение ТЗ к к 21 посту. Ждём продолжения...

(21) эй - этого не было в условии, я так не играю (

(21) Прикольно наблюдать сей диалог. Чем тогда поможет (12), если "могут встречаться буквы, точки..."?

(22) продолжение: обратную функцию, есть строка, например 475834, нужно сделать 0000475834.

(0) Для тебя лучший алгоритм: Бери больше, кидай дальше, пока летит - отдыхаешь!

(25) не буду делать.

строка(число("00000453099"))

(25) + Можно усложнить условием "количество нулей неизвестно".

(25)Открой типовую конфигурацию или демо БСП. Там все эти функции есть. Ждёшь, когда другие оттуда цитат надёргают?

(29) количество нулей от 0 до 10, максимальная длина строки 10

(31) Это был сарказм если чо...

Где то видел

Стр=Прав("000000000000000"+Стр,11);

(0) Вы на чем разрабатываете?
В БСП есть процедуры, которые это делают + во всех типовых "старой" линейки есть такие процедуры

(7)(8) кошмар, вызывать констуктор строки несколько раз

(28) лидирующие нули все равно могут остаться

(0) Если строка состоит из одних только цифр как в примере, можно преобразовать в число и обратно в строку. а правильное решение:

й = 1;
Пока Сред(стр,й,1) = "0" Цикл
  й = й + 1;
КонецЦикла;

Стр = Сред(стр, й);

к (35): забыл проверку на конец строки

Для й = 1 по СтрДлина(Стр) Цикл
  Если Сред(стр,й,1) = "0" Тогда
    Прервать;
  КонецЕсли;
КонецЦикла;

(35)(36) Кошмар, вызывать конструктор строки несколько раз!