Код IT Загрузка примера кода…

1С (BSL) main.bsl
Функция ТестРассчитатьНалог()
    
    Результат1 = РассчитатьНалог(100, 20);
    Если Результат1 <> 20 Тогда
        Сообщить("Ошибка теста 1");
        Возврат Ложь;
    КонецЕсли;
    
    Результат2 = РассчитатьНалог(500, 10);
    Если Результат2 <> 50 Тогда
        Сообщить("Ошибка теста 2");
        Возврат Ложь;
    КонецЕсли;
    
    Возврат Истина;
    
КонецФункции
Функция ТестРассчитатьНалог()
    
    Результат1 = РассчитатьНалог(100, 20);
    Если Результат1 <> 20 Тогда
        Сообщить("Ошибка теста 1");
        Возврат Ложь;
    КонецЕсли;
    
    Результат2 = РассчитатьНалог(500, 10);
    Если Результат2 <> 50 Тогда
        Сообщить("Ошибка теста 2");
        Возврат Ложь;
    КонецЕсли;
    
    Возврат Истина;
    
КонецФункции