АТ
Алексей Трефильев
> в basice
На каком Basic'e? Их вон сколько разных http://en.wikipedia.org/wiki/List_of_BASIC_dialects
> Определить.. .
Это типа приказ или распоряжение?
Покажите вашу попытку что-либо сделать, а там посмотрим.
если каждое следующее число больше предыдущего
а>a[i-1]
то возрастающая.
если написать за Вас, укажите гонорар
я посмотрю справочник по бейсику
10 input n
20 k=n
30 input n
40 if n<>0 and n<=k then goto 100
50 k=n
60 if n<>0 then goto 30
70 print "da!"
80 end
100 print "net!"