[решено] Можно ли написать (.vbs) скрирт чтобы рассчитать окружность

[ufooo000]

Можно ли написать (.vbs) скрирт чтобы рассчитать окружность зная радиус применяя формулу: ( C=2ПR ).
Длина окружности = ( 2 x 3.14 ) x радиус окружности.
Пример: Вводим в поле созданного vbs-ом цифры радиуса-жмем [ Enter ] и получаем окружность.

[Iska]

Можно ли написать »
Можно. Пишите.

WScript.Echo 2 * 4 * Atn(1) * CDbl(InputBox("Enter radius:", "Enter radius", 5))