URL = "http://lenta.ru/news/2013/10/02/betterkittens/";
Части = "";
Пока НЕ ПустаяСтрока(URL) Цикл
Поз = Найти(URL, "/");
Если Поз = 0 Тогда
Сообщить(URL);
Прервать;
Иначе
Часть = Лев(URL, Поз - 1);
Если НЕ ПустаяСтрока(Часть) Тогда
Сообщить(Часть);
КонецЕсли;
URL = Сред(URL, Поз + 1, СтрДлина(URL) - Поз);
КонецЕсли;
КонецЦикла;