zadach302.BAS

{* Задача302 *}

REM basic

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


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"
End