formula - QBasic - 如何获得 F 的值

Question

我有以下公式：

F =  X / 1+4+9+16+....+n^2

我怎样才能编写一个QBasic找到结果的程序F？

谢谢。

Answer 1

CLS
INPUT "Input the value of n: ", n%
INPUT "The value of X: ", X
denominator% = 0
FOR i% = 1 TO n%
    denominator% = denominator% + i% ^ 2
NEXT i%
F = X / denominator%
PRINT "F = "; F

Answer 2

在这个有用的页面中，前 n 个自然数的平方和为：

所以你只需要计算：

F = X * 6 / (n * (n + 1) * (2 * n + 1))

Answer 3

功率倍增器：

DEFDBL A-Z
INPUT "Input the value of n: ", n
INPUT "The value of X: ", X
INPUT "The power: ", p
denominator = 0
FOR i = 1 TO n
    denominator = denominator + i ^ p
NEXT
F = X / denominator
PRINT "F = "; F
END