• Вычислить площадь круга и длины окружности при известном радиусе в visual basic for application. С использованием inputBox и MsgBox

Ответы 4

  • А можно вместо CDbl другое написать?
    • Автор:

      zekeikfi
    • 5 лет назад
    • 0
  • Зачем?
    • Автор:

      darian
    • 5 лет назад
    • 0
  • Ну напишите cSng, точность расчета ниже будет. Можете написать древнючее Val
  • Sub aaa()    r = CDbl(InputBox("Введите радиус"))    Pi = 4 * Atn(1)    s = Pi * r ^ 2    c = 2 * Pi * r    MsgBox "S=" + CStr(s) + ", C=" + CStr(c), vbOKOnlyEnd Sub
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years