Замена цикла с сообщениями на stream api

Author: nixel2007

test.os

@@ -29,7 +29,6 @@
 Массив.Добавить(1);
 Массив.Добавить(0);
 
-// Стрим = Потоки.ИзКоллекции(Массив);
 Стрим = Новый Стрим;
 Стрим.УстановитьКоллекцию(Массив);
 
@@ -38,18 +37,12 @@
 	.Фильтровать(ФункцияФильтрации)
 	.Первые(2)
 	.Обработать(ФункцияОбработки)
-	.ВМассив();
-
-Для Каждого Элемент Из Результат Цикл
-	Сообщить(Элемент);
-КонецЦикла;
+	.ДляКаждого(Потоки.СтандартныйОбработчик_Сообщить());
 
 Стрим = Потоки.ИзКоллекции(Массив);
-Результат = Стрим.Сортировать().ВМассив();
-
-Для Каждого Элемент Из Результат Цикл
-	Сообщить(Элемент);
-КонецЦикла;
+Результат = Стрим
+	.Сортировать()
+	.ДляКаждого(Потоки.СтандартныйОбработчик_Сообщить());
 
 Массив = Новый Массив;
 Массив.Добавить(1);
@@ -60,12 +53,13 @@
 Массив.Добавить(3);
 
 Стрим = Потоки.ИзКоллекции(Массив);
-Результат = Стрим.Различные().ВМассив();
-
-Для Каждого Элемент Из Результат Цикл
-	Сообщить(Элемент);
-КонецЦикла;
+Результат = Стрим
+	.Различные()
+	.ДляКаждого(Потоки.СтандартныйОбработчик_Сообщить());
 
 Стрим = Потоки.ИзКоллекции(Массив);
-Результат = Стрим.Обработать(ФункцияОбработки).Сократить(ФункцияСокращения, 0);
-Сообщить(Результат);
+Результат = Стрим
+	.Обработать(ФункцияОбработки)
+	.Сократить(ФункцияСокращения, 0);
+
+Сообщить(Результат);