Определить длины окружности и площадь круга - 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
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д