Лабораторна робота 13
Варіант 11
Кіник Марія
13.1 Лінійний алгоритм
Дано: Визначити час падіння каменю на поверхню землі з висоти h (розрахункова формула gt²/2).
Розв’язання
Блок-схема
Кінець
T
T=
H=
G=9.8
початок
Код програми
Sub lim()
Dim T As Double
h = InputBox("h=")
g = 9.81
T = Sqr((2 * h) / g)
MsgBox ("T=") & T
End Sub
Результати
