Visual Basic

[Elifas]

Экзаменационная задача, представления не имею что нужно делать, и какие операторы использовать(((

Написать программу, которая предлагает пользователю ввести координаты N точек плоскости x,y. Программа выводит в окне сообщения, сколько из заданых точек находятся в круге с центром в начале координат радиусом R.R, N и координаты точек вводятся пользователем после запуска программы

[doober]

В помощь вам функция по определению принадлежности точки кругу
Р-координаты точки,С координаты центра,R радиус

Public Function in_circle(P, C, R) As Boolean
        Dim rx As Double
        Dim ry As Double
        rx = C(0) - P(0)
        ry = C(1) - P(1)
in_circle = IIf(rx ^ 2 + ry ^ 2 < R ^ 2, True, False)
 End Function

[Elifas]

Сообщение от doober

В помощь вам функция по определению принадлежности точки кругу
Р-координаты точки,С координаты центра,R радиус

Public Function in_circle(P, C, R) As Boolean
        Dim rx As Double
        Dim ry As Double
        rx = C(0) - P(0)
        ry = C(1) - P(1)
in_circle = IIf(rx ^ 2 + ry ^ 2 < R ^ 2, True, False)
 End Function

Спасибо огромное))