CLS
INPUT "Vvedite koordonati tochki x1"; x1
INPUT "Vvedite koordonati tochki y1"; y1
INPUT "Vvedite koordonati tochki z1"; z1
INPUT "Vvedite koordonati tochki x2"; x2
INPUT "Vvedite koordonati tochki y2"; y2
INPUT "Vvedite koordonati tochki z2"; z2
R = SQR(((x2 - x1) ^ 2) + ((y2 - y1) ^ 2) + ((z2 - z1) ^ 2))
V = (4 / 3) * 3.14 * R ^ 3
PRINT V
END
Тестирование выполнено в программе QB64