Составить программу для вычисления длины окружности, площади круга, и обЪема шара одинаково радиуса- PureBasic(Бейсик)

cls
dim R
dim L
dim S
dim V
input R
L = 2*3.14*R
S = 2*3.14*R*R
V = 2*3.14*R*R*R
print L
print S
print V

input "Введите радиус", R
L = 2*3.14*R
S = 2*3.14*R*R
V = 2*3.14*R*R*R
print "Длина: ";L;" Площадь: ";S;" Объем: ";V
end