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