To find volume hemisphere. (Qbasic code)
CLS
LET pi = 3.14
INPUT "Enter the value of radius"; r
vh = 2 / 3 * pi * r ^ 3
PRINT "The volume of hemisphere is"; vh
END
CLS
LET pi = 3.14
INPUT "Enter the value of radius"; r
vh = 2 / 3 * pi * r ^ 3
PRINT "The volume of hemisphere is"; vh
END