//**************************************************************************************************
Функция Сконвертировать(Строчка,Коэфф)
//Подразумевается время в формате ЧЧ:ММ:СС,ТТТ
Результат = "";
КонецПервогоВремени = Найти(Строчка,"-->") - 1;
НачалоВторогоВремени= Найти(Строчка,"-->") + 3;
ПервоеВремя = СокрЛП(Лев(Строчка,КонецПервогоВремени));
Часы = 0;
Минуты = 0;
Секунды = 0;
ДолиСекунд = 0;
Часы = Число(Сред(ПервоеВремя,1,2));
Минуты = Число(Сред(ПервоеВремя,4,2));
Секунды = Число(Сред(ПервоеВремя,7,2));
ПервоеВремяКруглое = Секунды+60*Минуты+3600*Часы;
МестоЗапятой = Найти(ПервоеВремя,",");//Вдруг сотые, а не тысячные?
ДолиСекунд = Прав(ПервоеВремя,СтрДлина(ПервоеВремя) - МестоЗапятой);
ПервоеВремяТочное = Число(Строка(ПервоеВремяКруглое)+"."+ДолиСекунд);
ПервоеВремяНовое = ПервоеВремяТочное*Коэфф;
ПервоеВремяЦелое = Цел(ПервоеВремяНовое);
ДолиСекундНовые = (ПервоеВремяНовое-ПервоеВремяЦелое)*1000;
СтрокаДолиСекундыНовые = Формат(ДолиСекундНовые,"Ч(0)3,0");
Секунды=ПервоеВремяЦелое%60;
ПолноеЧислоМинут=Цел(ПервоеВремяЦелое/60);
Минуты=ПолноеЧислоМинут%60;
ПолноеЧислоЧасов=Цел(ПолноеЧислоМинут/60);
Часы=ПолноеЧислоЧасов%24;
ПервоеВремяНовоеТочное = Формат(Часы,"Ч(0)2,0")+":"+Формат(Минуты,"Ч(0)2,0")+":"+Формат(Секунды,"Ч(0)2,0")+","+СтрокаДолиСекундыНовые;

ВтороеВремя = СокрЛП(Прав(Строчка,СтрДлина(Строчка) - НачалоВторогоВремени));
Часы = 0;
Минуты = 0;
Секунды = 0;
ДолиСекунд = 0;
Часы = Число(Сред(ВтороеВремя,1,2));
Минуты = Число(Сред(ВтороеВремя,4,2));
Секунды = Число(Сред(ВтороеВремя,7,2));
ВтороеВремяКруглое = Секунды+60*Минуты+3600*Часы;
МестоЗапятой = Найти(ВтороеВремя,",");//Вдруг сотые, а не тысячные?
ДолиСекунд = Прав(ВтороеВремя,СтрДлина(ВтороеВремя) - МестоЗапятой);
ВтороеВремяТочное = Число(Строка(ВтороеВремяКруглое)+"."+ДолиСекунд);
ВтороеВремяНовое = ВтороеВремяТочное*Коэфф;
ВтороеВремяЦелое = Цел(ВтороеВремяНовое);
ДолиСекундНовые = (ВтороеВремяНовое-ВтороеВремяЦелое)*1000;
СтрокаДолиСекундыНовые = Формат(ДолиСекундНовые,"Ч(0)3,0");
Секунды=ВтороеВремяЦелое%60;
ПолноеЧислоМинут=Цел(ВтороеВремяЦелое/60);
Минуты=ПолноеЧислоМинут%60;
ПолноеЧислоЧасов=Цел(ПолноеЧислоМинут/60);
Часы=ПолноеЧислоЧасов%24;
ВтороеВремяНовоеТочное = Формат(Часы,"Ч(0)2,0")+":"+Формат(Минуты,"Ч(0)2,0")+":"+Формат(Секунды,"Ч(0)2,0")+","+СтрокаДолиСекундыНовые;

Результат = ПервоеВремяНовоеТочное + " --> " + ВтороеВремяНовоеТочное;

Возврат Результат;

КонецФункции