CS>for( var ... in ...) ... otherwise ...;
CS>

CS>if( arr.length )
CS>  for ( var el in arr ) ...
CS>else
CS>  ...; 
CS>

isBreakerd = false;

for el in arr:
  ...
  if something:
    isBreakerd = true;
    break
  ...
    
if isBreakerd: ... # выполняем else-действия

CS>  var count = 0;
CS>  for ( var el in arr )
CS>  {
CS>    ++count; 
CS>    ...
CS>  }
CS>  if(!count)
CS>    ...
CS>

VD>isBreakerd = false;

VD>for el in arr:
VD>  ...
VD>  if something:
VD>    isBreakerd = true;
VD>    break
VD>  ...
    
VD>if isBreakerd: ... # выполняем else-действия
VD>

if not isBreakerd: ...

E>>повседневного кодирования чуточку ярче

@ Общая схема чтения конфигурационного файла

@d config_file_error = goto config_file_error_label

@<Чтение конфигурационного файла@> =
  foreach item in Configuration file { Типа псевдокода }
    @<Обрабатываем строку конфигурационного файла@>

  @<Последние штрихи к обработке@>
  goto finalization;

  config_file_error_label:
    @<Обработка случая, когда в конфигурационном файле найдена ошибка@>
    goto finalization; 

  finalization:
    <@Финализируем обработку файла@>
    
@ Обработка одной строки конфигурационного файла

@<Обрабатываем строку конфигурационного файла@> =
  код...

  foreach a in B
    ...
  on break
    ...

  statemachine TestStatemachine entry MainForeach
  {
    var Common: int;

    situation MainForeach onexit NormalXXXHandling:
      foreach(x in XXX)
      {
        if (Something) goto LoopFailture("Something wrong");
        // ...
      }

    situation final NormalXXXHandling final:
      Console.Print("XXX has beenhandled!");

    situation final LoopFailture(Msg: string):
      Console.Print("something wrong! {1}", Msg);

    // А сюда можно добавить стандартные обработчики, например

    situation SituationChanged(S1, S2):
      Console.Print("State was switched {1} => {2}", S1, S2);

    situation final ExceptionOccured(E):
      Console.Print("Exception {1}", E.Msg);
      
  }

  // Сюда же интересно было бы добавить waitevent

namedBlock :
{
  foreach (x in xs)
    foreach (y in xs)
      foreach (z in xs)
      {
         ...
         when (cond)
            namedBlock(x + y + z);
      }
}

для x из X:
  сделать что то
иначе:
  сделать что то другое

если есть что перебирать:
  перебираем
иначе:
  пишем коммент на кывт