Информатика. Толстяков Р.Р - 102 стр.

UptoLike

ВУЗ: 

ТГТУ | Тамбов

Составители: 

Рубрика: 

102
Продолжение табл.
3) наибольший элемент из
3 –это элемент с индексом 4,
меняется с элементом мас-
сива с индексом 2
4) наибольший элемент из
2 – это элемент с индексом
4, меняется с элементом
массива с индексом 3
В итоге получаем упорядоченный по убыванию массив данных.
6
4
3
2
1
Пример программы:
INPUT "Введите число элементов массива", n
DIM mas(n)
FOR I=0 TO n-1
mas(I)=INT(RND*10)
NEXT
CLS
PRINT "Вывод массива"
FOR I=0 TO n-1
PRINT mas(I);
NEXT
REM сортировка массива
FOR I=0 TO n-2
FOR J=I+1 TO n-1
IF mas(I)<mas(J) THEN
a=mas(I)mas(I)=mas(J)mas(J)=a
END IF
NEXT J
NEXT I
REM конец сортировки массива
PRINT
PRINT "Вывод отсортированного массива"
FOR I=0 TO n-1
PRINT mas(I);
NEXT
END
0 1 2 3 4
6 4 3 1 2
0 1 2 3 4
6 4 2 1 3

Страницы