Семь элементов массива вводятся с клавиатуры. вывести элементы массива в обратном порядке. найти скмму элементов массива

Cls
dim a(7)
for i=1 to 7
  input a(i)
next i
for i=7 to 1 step -1
  s=s+a(i)
  print a(i);
next i
print "summa="; s