ПОМОГИТЕ РЕШИТЬ!!!!!!!!!!!Определите результат работы программы

DIM A(10) AS INTEGER

s=0

FOR i = 1 TO 10

A(i)=i * 2

s=s + A(i)

NEXT i

PRINT s

END