echo on
clc

d = tf([3 0], [6 3])       %derivaèní èlen 1. øádu se setrvaèností 1. øádu
d1 = tf([3 0], [6 3 1])     %derivaèní èlen 1. øádu se setrvaèností 2. øádu
d2 = tf([3 1 0], [6 3 5 1]) %derivaèní èlen 2. øádu se setrvaèností 3. øádu

pause % Pro pokraèování zmáèkni libovolnou klávesu

impulse(d, d1,d2)          %vykresleni g(t)
ylabel('g(t)')
xlabel('cas[s]')
title('Impulsni charakteristika')