...
Пока Истина Цикл
...
Если что-то Тогда
Прервать;
КонецЕсли;
...
КонецЦикла;
...

код как код

гениально ...
человек не хотел что бы праздник прекращался )

С какой целью интересуетесь?

ИМХО, аналог Перейти. Иногда имеет право на существование :)

(2) Цикл то конечный, зацикливания нет

(4) А причем тут перейти?

Например опрашиваем какое-то устройство, если оно не готово опрашиваем еше раз

Нормальный код. Не всегда удобно все условия в "пока" всовывать

(5) "А причем тут перейти? "
При том, что перейти похоже действует, тоже безусловный переход, как и у


Пока Истина Цикл
КонецЦикла;


;)

Ни разу в разумной жизни не пришлось к такому прибегнуть.  
Значит г***код.

(8) вопросов нет , осталось убедить писателей типовых - что их код г***код, потому что какой то поросёнок ни разу в жизни так не писал

БП 2.0
Пока Истина Цикл - найдено 840


первый же пример

Если ИспользоватьСобытияПриФормированииОтчета Тогда
            //Основной цикл вывода отчета
            Пока Истина Цикл
                
                //Получим следующий элемент результата компоновки
                ЭлементРезультата = ПроцессорКомпоновки.Следующий();
                
                Если ЭлементРезультата = Неопределено Тогда
                    //Следующий элемент не получен - заканчиваем цикл вывода
                    Прервать;
                Иначе
                    
                    Отказ = Ложь;
                    
                    Попытка
                        ОтчетОбъект.ПередВыводомЭлементаРезультата(МакетКомпоновки, ДанныеРасшифровки, ЭлементРезультата, Отказ);
                    Исключение
                    КонецПопытки;
                    
                    Если Не Отказ Тогда
                        //Элемент получен - выведем его при помощи процессора вывода
                        ПроцессорВывода.ВывестиЭлемент(ЭлементРезультата);
                    КонецЕсли;    
                КонецЕсли;
            КонецЦикла;
            
            //Завершение вывода отчета
            ПроцессорВывода.ЗакончитьВывод();
        Иначе
            ПроцессорВывода.Вывести(ПроцессорКомпоновки, Истина);
        КонецЕсли;

Это из ОМ КонтролируемыеСделки Процедура ВывестиОтчет

или
Функция ЗаменитьНедопустимыеСимволыXML(Знач Текст, СимволЗамены = " ") Экспорт
    
#Если НЕ ВебКлиент Тогда
    ПозицияНачала = 1;
    Пока Истина Цикл
        Позиция = НайтиНедопустимыеСимволыXML(Текст, ПозицияНачала);
        Если Позиция = 0 Тогда
            Прервать;
        КонецЕсли;
        Если Позиция > 1 Тогда
            НедопустимыйСимвол = Сред(Текст, Позиция - 1, 1);
            Если НайтиНедопустимыеСимволыXML(НедопустимыйСимвол) > 0 Тогда
                Текст = СтрЗаменить(Текст, НедопустимыйСимвол, СимволЗамены);
            КонецЕсли;
        КонецЕсли;
        НедопустимыйСимвол = Сред(Текст, Позиция, 1);
        Если НайтиНедопустимыеСимволыXML(НедопустимыйСимвол) > 0 Тогда
            Текст = СтрЗаменить(Текст, НедопустимыйСимвол, СимволЗамены);
        КонецЕсли;
        ПозицияНачала = Позиция + 1;
    КонецЦикла;
#КонецЕсли

    Возврат Текст;
КонецФункции

или в обмене данными

        Пока Истина Цикл
            Индекс = МассивУзлов.Найти(НаборЗаписей.ОбменДанными.Отправитель);
            Если Индекс = Неопределено Тогда
                Прервать;
            КонецЕсли;
            МассивУзлов.Удалить(Индекс);
        КонецЦикла;

Ну нет в 1С конструкции
repeat
until

Использую такой код, например, при чтении эксель файла

(14) А я писал
Пока КонецФайла <> 1 Цикл
...
...тут где-то КонецФайла = 1

Можно и так, но как правило условия выхода из такого цикла сложне одного простого условия, а изредка условий несколько, не люблю внутри пока сложные условия, прервать зачастую проще читается

(15) Можно и так, но как правило условия выхода из такого цикла сложне одного простого условия, а изредка условий несколько, не люблю внутри пока сложные условия, прервать зачастую проще читается

(0) а что скажете насчет такой конструкции в Си?
for(;;)

(0) Код как код, только ты почему-то грустишь..

(8) Во многих языках специально добавлен оператор бесконечного цикла.

wiki:%C1%E5%F1%EA%EE%ED%E5%F7%ED%FB%E9_%F6%E8%EA%EB

(15) Неоптимально, лишняя память на лишнюю переменную расходуется :)

(0) Прикажешь отменить бесконечные циклы?)))
И вместе с ними все ОС реального режима?)))))

http://content.screencast.com/users/Che66/folders/Jing/media/5ac69dfd-7729-4f87-acea-83bd26ef25bb/2013-08-10_2045.png

wiki:FALSE

В УНф такой код встречаетcя

(9) Отличный пример г-кода. Про попытку умолчу, код и без неё "блястящ". Если мыслить не сущностями, а строками, бесконечные циклы и гото вполне здравые вещи.

P/S Люди. Типовые пишут обычные люди. Кто пишет хорошо, а кто и лютого качества п-ц.

(15) *А я писал
Пока Конец*
Мы знаем что ты Конец :))) Уже много лет. Но любим мы тебя не за это :)))

нормальный код

Код как код. Совершенно непонятна критика. Наверное в мозгах критиканов что-то не то...

Ну и что вам не нравится.
Если создатели 1С не подумали о циклах с условием в конце
(Например Do ... Loop While Condition=True) то приходится частенько писать цикл с условием в истину.
А в восьмой версии, к тому же, весь перебор превратили в функции, возвращающие значения. Но 1С не поддерживает вложенных выражений, то есть нельзя написать While(Null!=(Result=Object.RequestNextData)) - приходится сначала получать значение в переменную, а потом его сравнивать с НЕОПРЕДЕЛЕНО.
Хотя, конечно, можно написать функцию-заглушку,которая копирует один параметр в другой и проверяет его на равенство НЕОПРЕДЕЛЕНО, но такой подход ясности коду не добавит.

(0) Только одно: криво отформатирован!

(0) Вполне себе нормальный код. DO ... WHILE можно реализовать таким вот образом.

Только если в теле цикла используются вызовы к функциям в реализации которых в ожидании вывода останавливаются потоки,
либо если мы не ждем асинхронного события, а перебираем варианты, один из которых гарантированно прервет цикл.
Если не так - то код опасен. И я бы спросил автора на этот счет, прежде чем принимать у него работу.

(0) Ужас. он же не должен работать
Разве эти строки
"..."
не вызывают ошибки ?

В семерке писали:
Пока 1=1 Цикл
И ничего...

код стар как я, открыл Америку блеат

нормальный код.


В

Пока Условие() Цикл
КонецЦикла

тоже можно постоянное  условие втулить и получить бесконечный цикл

А конструкция из (0) - некий аналог паскалевского

repeat
until

Т.е. железного выполнения хотя бы раз