Visual basic.напишите программу,вычисляющую по известным значениям дома,ускорения свободного падения и начальной скорости и массы кирпича время его падения с крыши. ,на других языках сам написал бы,этот не знаю

Sub Zadanie17876462
    h = InputBox("Высота дома = ")
    g = 10
    MsgBox sqr(2 * h / g)
End Sub

Call Zadanie17876462()