Answer:
Ecological damage of mining the materials would be added
Explanation:
Answer:
see explaination
Explanation:
Module VBModule
Function KineticEnergy(ByVal mass As Decimal, ByVal velocity As Decimal) As Decimal
Dim result As Decimal
result = 0.5*mass*velocity*velocity
KineticEnergy = result
End Function
Sub Main()
Dim mass = Console.ReadLine()
Dim velocity = Console.ReadLine()
Console.WriteLine(FormatNumber(CDbl(KineticEnergy(mass,velocity)), 3))
End Sub
End Module
Answer:
22.90 × 10⁸ kg
Explanation:
Given:
Diameter, d = 0.02 m
ωₙ = 0.95 rad/sec
Time period, T = 0.35 sec
Now, we know
T= ![2\pi\sqrt{\frac{L}{g}}](https://tex.z-dn.net/?f=2%5Cpi%5Csqrt%7B%5Cfrac%7BL%7D%7Bg%7D%7D)
where, L is the length of the steel cable
g is the acceleration due to gravity
0.35= ![2\pi\sqrt{\frac{L}{9.81}}](https://tex.z-dn.net/?f=2%5Cpi%5Csqrt%7B%5Cfrac%7BL%7D%7B9.81%7D%7D)
or
L = 0.0304 m
Now,
The stiffness, K is given as:
K = ![\frac{\textup{AE}}{\textup{L}}](https://tex.z-dn.net/?f=%5Cfrac%7B%5Ctextup%7BAE%7D%7D%7B%5Ctextup%7BL%7D%7D)
Where, A is the area
E is the elastic modulus of the steel = 2 × 10¹¹ N/m²
or
K = ![\frac{\frac{\pi}{4}d^2\times2\times10^11}{0.0304}](https://tex.z-dn.net/?f=%5Cfrac%7B%5Cfrac%7B%5Cpi%7D%7B4%7Dd%5E2%5Ctimes2%5Ctimes10%5E11%7D%7B0.0304%7D)
or
K = 20.66 × 10⁸ N
Also,
Natural frequency, ωₙ = ![\sqrt{\frac{K}{m}}](https://tex.z-dn.net/?f=%5Csqrt%7B%5Cfrac%7BK%7D%7Bm%7D%7D)
or
mass, m =
or
mass, m = ![\sqrt{\frac{20.66\times10^8}{0.95^2}}](https://tex.z-dn.net/?f=%5Csqrt%7B%5Cfrac%7B20.66%5Ctimes10%5E8%7D%7B0.95%5E2%7D%7D)
mass, m = 22.90 × 10⁸ kg