QBasic - 如何获得F的值

Question

我有以下公式：

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

如何在QBasic中编写一个找到F结果的程序？

感谢。

Answer 1

从this useful page开始，前n个自然数的平方和为：

所以你只需要计算：

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

Answer 2

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 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