Resonans

> f:=t->2*cos(2*t):

> masse_fjaer(1,4,0.25,0,0,10,f); #dempningskoeffisient 0.25

[Maple Math]

[Maple Math]
[Maple Math]
[Maple Math]

[Maple Plot]

> masse_fjaer(1,4,0,0,0,11.5,f); #ingen dempning

[Maple Math]

[Maple Math]

[Maple Plot]