Задать вопрос
22 ноября, 19:56

Известна длина окружности. Найти площадь круга, ограниченного этой окружностью. Visual basic

+4
Ответы (1)
  1. 22 ноября, 20:44
    0
    Module Module1

    Dim L As Double

    Const Pi = 3.1415926535897931

    Sub Main ()

    Console. Write ("L = ")

    L = Double. Parse (Console. ReadLine)

    L = L / (2 * Pi)

    Console. WriteLine ("S = " + (Pi * L * L). ToString)

    Console. ReadKey ()

    End Sub

    End Module

    Пример работы программы:

    L = 75

    S = 447,623277445956
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Известна длина окружности. Найти площадь круга, ограниченного этой окружностью. Visual basic ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы