Передаточная функция и импульсная характеристика фильтра Баттерворта 

In[1]:=

X tf = ButterworthFilterModel[3, s]

Out[1]=

In[2]:=

X OutputResponse[Rationalize[TransferFunctionExpand[tf]], s, t]

Out[2]=