Вычислить периметр и площадь прямоугольного треугольника по заданным длинам двух катетов...

Question

Вычислить периметр и площадь прямоугольного треугольника по заданным длинам двух катетов а и b

Answer 1

Если нжуен Visual Basic, то

1 2 3 4 5 6 7 8 OptionExplicitPrivateSub Command1_Click() Dim a, b, S, c AsInteger a = InputBox("Введите сторону а") b = InputBox("Введите сторону b") S = 0.5 * (a * b) Print"Площадь равна " & S & " кв. ед"EndSub