Код 1C v 8.3

 Код 1C v 8.3
="1c8">

="1c8">="keyword">Функция ПолучитьНомерБезНулейПрефикса="operator">(Номер="operator">) ="keyword">Экспорт
="1c8"> 
="1c8">Ответ ="operator">= ="string">"="string">0"="operator">; ="keyword">Для НомерСимвола="operator">=="string">1 ="keyword">по СтрДлина="operator">(Номер="operator">) ="keyword">Цикл ="keyword">Если Найти="operator">(="string">"="string">1="string">2="string">3="string">4="string">5="string">6="string">7="string">8="string">9"="operator">, Сред="operator">(Номер="operator">, НомерСимвола="operator">, ="string">1="operator">)="operator">)>;="operator">;="string">0 ="keyword">Тогда Ответ ="operator">= Сред="operator">(Номер="operator">, НомерСимвола="operator">)="operator">; ="keyword">Прервать="operator">; ="keyword">КонецЕсли="operator">; ="keyword">КонецЦикла="operator">; ="keyword">Возврат Ответ="operator">;
="1c8"> 
="1c8">="comment">// тест
="1c8"> 
="1c8">="keyword">КонецФункции