model sistemaMK "Sistema massa-mola não amortecido" massa m1(m = 10.0); mola k1(k = 1000.0); pontoFixo p1; forcaPeso P1(m = 10.0); constant Real PI = Modelica.Constants.pi; Real Wn = sqrt(k1.k / m1.m); Real fn = Wn / 2 / PI; Real T = 1 / fn; equation connect(P1.a, m1.a); connect(m1.a, k1.a); connect(k1.b, p1.a); annotation(Diagram(coordinateSystem(extent = {{-148.5, -105}, {148.5, 105}}, preserveAspectRatio = true, initialScale = 0.1, grid = {5, 5}))); end sistemaMK;