РеестрОстатков=РегистрыБухгалтерии.Хозрасчетный;
СтруктураОтбора = Новый Структура("Счет",ПланыСчетов.Хозрасчетный.ДенежныеСредстваВПутиВИностраннойВалюте);
СтруктураОтбора.Вставить("Организация", Организация);
СтруктураОтбора.Вставить("Валюта", Валюта);
СтруктураОтбора.Вставить("Субконто1", Банк);
Реквизиты = "Счет,Валюта,Субконто1";
РеестрОстатков = РеестрОстатков.Остатки(Новый Граница(ДатаДвижений, ВидГраницы.Включая),,СтруктураОтбора,Реквизиты,"Сумма,ВалютнаяСумма");
КурсПоСреднему =0;
Для каждого Стр из РеестрОстатков цикл
ОстатокВалРегУчета = Стр.СуммаОстатокДт-Стр.СуммаОстатокКт;
ОстатокИнаяВал = Стр.ВалютнаяСуммаОстатокДт-Стр.ВалютнаяСуммаОстатокКт;
КурсПоСреднему = ОстатокВалРегУчета/ОстатокИнаяВал;
КонецЦикла;
Посмотрите остатки по счету такому то, с отборами: организация, валюта, банк, смотрите на СуммаОстатокДт, СуммаОстатокКт, ВалютнаяСуммаОстатокДт, ВалютнаяСуммаОстатокКт, подставляйте свои значения в расчеты