ПОМОГИТЕ ПОЖАЛУЙСТА решить в VBA и вывести в excel

ПОМОГИТЕ ПОЖАЛУЙСТА решить в VBA и вывести в excel

Задать свой вопрос
1 ответ
Sub p1()
    Dim x As Double, y As Double
    x = InputBox("Введите x")
    y = InputBox("Введите y")
    Cells(3, 1) = x * y / (x + y) * Atn((1 - x ^ 2 * y ^ 2) ^ -0.5) 'Вывод в A3
End Sub
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт