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

    +1

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

    Senior

    Запостил: sandvich, 30 Октября 2019

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

    • ava phpBidlokoder2 31.10.2019 14:27 # −1

      Пытался перевести на "PHP"
      не получилось
      переведите кто шарит в 1с
      Ответить

      • ava bagrinho 31.10.2019 16:39 # +1 

        <?php
function УбратьПробел($стрЧисло) {
	//убирает пустой пробел
	$нСтр = "";
	for($п=1; $п <= strlen($стрЧисло); ++$п) {
		$р = substr($стрЧисло,$п,1);
		if($р == "1" || $р == "2" || $р == "3" || $р == "4" || $р == "5" || $р == "6" || $р == "7" || $р == "8" || $р == "9" || $р == "0" || $р == ",") {
			$нСтр = $нСтр+$р;
		}
	}
	return $нСтр;
}
        Ответить

        • ava guest8 31.10.2019 17:06 # −999

          показать все, что скрытоvanished
          Ответить

          • ava bagrinho 31.10.2019 17:18 # 0

            Буквы из какого алфавита?
            Ответить

            • ava guest8 31.10.2019 17:20 # −999

              показать все, что скрытоvanished
              Ответить

              • ava bagrinho 31.10.2019 17:26 # +1

                Легко!
                <?php
function УбратьПробел($стрЧисло) {
	//убирает пустой пробел
	$нСтр = "";
	for($п=1; $п <= strlen($стрЧисло); ++$п) {
		$р = substr($стрЧисло,$п,1);
		if($р == "1" || $р == "2" || $р == "3" || $р == "4" || $р == "5" || $р == "6" || $р == "7" || $р == "8" || $р == "9" || $р == "0" || $р == "," || $р == "A" || $р == "B" || $р == "C" || $р == "D" || $р == "E" || $р == "F" || $р == "G" || $р == "H" || $р == "I" || $р == "J" || $р == "K" || $р == "L" || $р == "M" || $р == "N" || $р == "O" || $р == "P" || $р == "Q" || $р == "R" || $р == "S" || $р == "T" || $р == "U" || $р == "V" || $р == "W" || $р == "X" || $р == "Y" || $р == "Z" || $р == "a" || $р == "b" || $р == "c" || $р == "d" || $р == "e" || $р == "f" || $р == "g" || $р == "h" || $р == "i" || $р == "j" || $р == "k" || $р == "l" || $р == "m" || $р == "n" || $р == "o" || $р == "p" || $р == "q" || $р == "r" || $р == "s" || $р == "t" || $р == "u" || $р == "v" || $р == "w" || $р == "x" || $р == "y" || $р == "z") {
			$нСтр = $нСтр+$р;
		}
	}
	return $нСтр;
}
                Ответить

        • ava gost 31.10.2019 18:29 # 0

          Непатриотичный какой-то у тебя перевод. Перевёл правильно!
          <?php
function УбратьПробел(₽стрЧисло) {
	//убирает пустой пробел
	₽нСтр = "";
	for(₽п=1; ₽п <= strlen(₽стрЧисло); ++₽п) {
		₽р = substr(₽стрЧисло,₽п,1);
		if(₽р == "1" || ₽р == "2" || ₽р == "3" || ₽р == "4" || ₽р == "5" || ₽р == "6" || ₽р == "7" || ₽р == "8" || ₽р == "9" || ₽р == "0" || ₽р == ",") {
			₽нСтр = ₽нСтр+₽р;
		}
	}
	return ₽нСтр;
}
          Ответить

          • ava CupuucKuu_nemyx 01.11.2019 00:36 # 0

            Это "₽H₽"?
            Ответить

          • ava Stallman 01.11.2019 09:45 # 0 

            <?гтш
функция УбратьПробел(₽стрЧисло) {
	//убирает пустой пробел
	₽нСтр = "";
	для(₽п=1; ₽п <= длстр(₽стрЧисло); ++₽п) {
		₽р = подстр(₽стрЧисло,₽п,1);
		если(₽р == "1" || ₽р == "2" || ₽р == "3" || ₽р == "4" || ₽р == "5" || ₽р == "6" || ₽р == "7" || ₽р == "8" || ₽р == "9" || ₽р == "0" || ₽р == ",") {
			₽нСтр = ₽нСтр+₽р;
		}
	}
	возврат ₽нСтр;
}
            Ответить

    • ava MAKAKA 01.11.2019 18:43 # −1

      В Ленобласти полицейские раскрыли дерзкое похищение петуха породы «Шамо»

      https://78.ru/news/2019-10-29/v_lenoblasti_policeiskie_raskrili_derzko e_pohishenie_petuha_porodi_shamo

      Фото: pxhere.com
      Полицейские по «горячим» следам раскрыли кражу птицы в Ленинградской области. Об этом сообщает пресс-служба главного управления МВД РФ по Петербургу и Ленобласти.

      Накануне в полицию Приозерского района обратился 33-летний житель одного из домов на Железнодорожной улице. Он заявил, что преступник разбил окно и проник в его квартиру на первом этаже, откуда похитил петуха породы «Шамо» стоимостью 20 тысяч рублей.

      По подозрению в совершении преступления была задержана 27-летняя неработающая женщина. Похищенную птицу вернули хозяину. По факту кражи возбуждено уголовное дело. Подозреваемой избрали меру пресечения в виде подписки о невыезде.

      Напомним, ранее в Подмосковье две девушки украли металлического Дзюбу.
      Ответить

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