Дан массив содержащий N элементов. Задание такое: Напечатать все элементы, которые не повторяются — QBasic(Бейсик)

Например дан массив А: 5 2 3 4 5 3
Здесь это 2 и 4.

CLS 'Programma k 3ada4a 5, 3adanie 19
INPUT "N= ", N
DIM A(N)
FOR I = 1 TO N
    INPUT A(I)
NEXT
PRINT "ishodnyj massiv"
FOR I = 1 TO N
    PRINT A(I);
NEXT
PRINT
PRINT "nepovtoryayushiesya elementy:"
FOR I = 1 TO N
    f = 0
    FOR j = 1 TO N
        IF I <> j AND A(I) = A(j) THEN f = 1
    NEXT
    IF f = 0 THEN PRINT A(I);
NEXT