Определить длины окружности и площадь круга - VB
Формулировка задачи:
помогите !!!!!
определить длины окружности и площадь круга !!!!
Решение задачи: «Определить длины окружности и площадь круга»
textual
Листинг программы
- Option Explicit
- Const PI = 3.14159
- Dim R As Double
- Private Sub Form_Click()
- R = Val(Text1)
- Print "Площадь окружности = " & Round(R * R * PI, 2)
- Print "Длина окружности = " & Round(2 * PI * R, 2)
- End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
