Помогите!Дан массив реальных чисел. Отыскать сумму 3-х его наивеличайших чисел. Заметим,

PRINT "Array size: "
INPUT n
PRINT "Input array: "
DIM a(n), t AS DOUBLE
FOR in = 1 TO n
    INPUT a(in)
NEXT in

FOR i = 1 TO n    
     FOR j = n - 1 TO i STEP -1
        IF a(j) gt; a(j + 1) THEN
            t = a(j)
            a(j) = a(j + 1)
            a(j + 1) = t
        END IF
    NEXT j
NEXT i

PRINT a(n - 2)
PRINT a(n - 1)
PRINT a(n)

Поначалу вводится количество элементов в массиве, потом сами элементы. После ввода заключительного элемента программа выводит три наивеличайших числа.