Дана последовательность из N целых чисел. Определить, является ли она строго возрастающей — QBasic(Бейсик)

CLS
INPUT n
FOR i = 1 TO n
        t = g
        INPUT " vvedite element"; g
        IF g < t THEN f = 1
NEXT
 
IF f <> 1 THEN PRINT "yes" ELSE PRINT "no"