Вычислить: sinx+sin2x+…+sinnx, где n- натуральное, х — действительное — QBasic(Бейсик)

CLS
DIM n AS INTEGER, x, sum
INPUT "Vvedite n:", n
INPUT "Vvedite x:", x
FOR i = 1 TO n
    sum = sum + SIN(x * i)
NEXT
PRINT "Rezultat:"; sum