Дан массив чисел T=(t1,t2…tk), состоящий из положительных элементов. Найти среднее гармоническое S=k/(1/t1+1/t2+…1/tk)/- QBasic(Бейсик)

INPUT "vvedite kol-vo chisel ", k
DIM t(k)
RANDOMIZE TIMER
FOR i = 1 TO k
    t(i) = INT(RND * 10) + 1
NEXT
PRINT "massiv"
FOR i = 1 TO k
    PRINT t(i);
NEXT
PRINT
FOR i = 1 TO k
    sum = sum + 1 / t(i)
NEXT
PRINT "srednee garmonicheskoe="; k / sum