Для каждого Стр Из Товари цикл
КонецЦикла;
СумаДокМинус = Стр.Сумма;
Сообщить(СумаДокМинус);
Если Стр.Цена>0 Тогда
Стр.Сумма=Стр.Количество*Стр.Цена;
КонецЕсли;
Если Стр.Сумма > 0 Тогда
Если Стр.Количество > 0 Тогда
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший