{Очистка товара ДТС1} Block( Let(@CH1,Remainder((CH-1),3)+1), While(CH1<=3, Block( ClearDtsTovCaptions(A, CH1), Let(@CH1,CH1+1) ) ) )