1. 1C / Говнокод #13039

    −166

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    Функция  УбратьПробелы(Строка)
    	ВозвратСтрока = "";
    	Сч = 1;
    	ДлинаСтроки = СтрДлина(Строка);
    	Пока Сч <= ДлинаСтроки Цикл 
    		Если КодСимвола(Строка, Сч) <> 160 Тогда
    			ВозвратСтрока = ВозвратСтрока + Символ(КодСимвола(Строка, Сч));
    		КонецЕсли;
    		Сч = Сч + 1;
    	КонецЦикла;
    	Возврат ВозвратСтрока;
    КонецФункции

    Видимо
    Строка = СтрЗаменить(Строка, Символ(160), "");
    выглядело слишком неочевидно, пробелы же нестандартные, а вот УбратьПробелы(Строка) - это - да, это всем понятно.

    Запостил: madcat_sev, 23 Мая 2013

    Комментарии (5) RSS

    Добавить комментарий