Светлана Екб

помогите,пожалуйста,составить блок-схему...завтра надо сдавать.
задача:
Вычислить среднее геометрическое положительных элементов мас-сива F(n), найденное среднее геометрическое записать в массив F как n + 1 элемент.
решение:
CLS
DIM S(10)
FOR I = 1 TO 10
S(I) = 1 + INT (1000*RND)
N = SQR (S(1)*S(2)*S(3)*S(4)*S(5)*S(6)*S(7)*S(8)*(9))
NEXT
DIM F (11)
X = SQR (S(1)*S(2)*S(3)*S(4)*S(5)*S(6)*S(7)*S(8)*S(9)*S(10 ))
PRINT X, N
END