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

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