АТ
Алексей Трефильев

программу в basice. Дана последовательность n целых чисел, заканчивающихся 0. Определить, является ли она возрастающей

Ан
Анюта

> в 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!"

Похожие вопросы
помогите написать программу. В последовательности из n целых чисел найти число с максимальным количеством цифр.
Дана матрица целых чисел N*N. С++
Дана последовательность целых чисел (массив) . Определить, образуют ли элементы чередование нулей и ненулевых элементов
Помогите, пожалуйста, с программой на паскале.Дана последовательность n целых чисел. Найти произведение простых чисел.
Дана последовательность n целых чисел. Вычислить произведение простых чисел последовательности. (без массива) Как решить?
Данная последовательность целых чисел, за которой следует 0.Найти количество нечетных элементов этой последовательности
Дан файл целых чисел. Определить среднее арифметическое всех чисел
Дана последовательность вещественных чисел
Паскаль, нужно вывести через пробел N случайных целых чисел, дано N.
На входе целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом нулём.