Zanukzokn 31 октября 2019 в 08:52

Дан одномерный массив заполненный случайным образом десятью целыми в диапазоне от 0 до 100. Заполенный массив вывести на экран. Найти самую длинную последовательность чисел упорядочную по возрастанию. Вывести на экран эту последовательность и её длину.

CLSINPUT nDIM A(n)FOR i = 1 TO n  A(i) = INT(RND * 100)NEXT iFOR i = 1 TO n  FOR j = 1 TO n    IF A(i) lt; A(j) THEN SWAP A(i), A(j)  NEXT jNEXT iFOR i = 1 TO n  PRINT A(i)NEXT i
Компьютеры и вычисления
Для комментирования необходимо зарегистрироваться на сайте