Для данной задачи нам нужна 1 кнопка (Button1) и 2 метки (Label).азместите их на форме. Для того, чтобы узнать длину окружности и площадь круга нужно знать радиус окружности, поэтому в данной программе мы введем окно InputBox для запроса величины радиуса. Вот программа: Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim R As Double 'Радиус окружности
Dim L, S As Double 'Длина окружности и площадь круга
'Ввод исходных данных
R = InputBox("Введите радиус окружности")
'Вычисление результатов
L = 2 * Math.PI * R
S = Math.PI * R ^ 2
'Отображение результатов
Label1.Text = "Длина окружности = " & L
Label2.Text = "Площадь круга = " & S
End Sub
