Пример информационной технологии,

Реализующей процесс упорядочения элементов массива

Для упорядочения значений элементов массива по возрастанию (убыванию) используются производные алгоритмические структуры Поиск максимума (минимума) и Перестановка.

Пример 16.

Разработать информационную технологию, позволяющую упорядочить вектор А произвольной размерности m по возрастанию значений его элементов.

Входные данные: m – целое число;

A=[a_i], – массив целых чисел.

Выходные данные: A=[a_i], – упорядоченный массив целых чисел.

Математическая модель:

для n = m...1

y = –1000; для i = 1.. n;

если a_i < y, то y = a_i, k = i, a_k = a_n, a_n = y

Схема алгоритма:

Код приложения:

Private Sub Form_Click()

Dim m As Integer, n As Integer, A() As Integer

Dim i As Integer, k As Integer, y As Integer

m = InputBox("Введите размерность вектора")

ReDim A(1 To m)

Print "Исходный массив"

For i = 1 To m

а(i) = InputBox("a(" & i & ")=")

Print а(i);

Next

For n = m To 1 Step -1

y = -10000

For i = 1 To n

If а(i) > y Then y = а(i): k = i

Next i

а(k) = а(n): а(n) = y

Next n

Print Chr(10); "Упорядоченный массив"

For i = 1 To m

Print а(i);

Next

End Sub

СОДЕРЖАНИЕ

Введение........................................................
Массивы данных..................................................
Объявление массивов в Visual Basic..................................
1. ВЫЧИСЛИТЕЛЬНЫЙ ПРОЦЕСС ЗАПОЛНЕНИЕ...................
1.1. Производная алгоритмическая структура Формирование...........
1.2. Производная алгоритмическая структура Пересчет...............
2. ВЫЧИСЛИТЕЛЬНЫЙ ПРОЦЕСС ПОИСК.........................
2.1. Производная алгоритмическая структура Поиск по ключу..........
2.2. Производная алгоритмическая структура Поиск максимума........
2.3. Производная алгоритмическая структура Поиск минимума.........
3. ВЫЧИСЛИТЕЛЬНЫЙ ПРОЦЕСС НАКОПЛЕНИЕ...................
3.1. Производная алгоритмическая структура Сумма..................
3.2. Производная алгоритмическая структура Произведение............
3.3. Производная алгоритмическая структура Счетчик................
4. СИНТЕЗ СЛОЖНЫХ АЛГОРИТМОВ ИЗ ПРОИЗВОДНЫХ АЛГОРИТМИЧЕСКИХ СТРУКТУР...............................
4.1. Производная алгоритмическая структура Выборка................
4.2. Производная алгоритмическая структура Перестановка...........
4.3. Пример информационной технологии, реализующей процесс упорядочения элементов массива...............................

Составили: проф. Н.Ф.Костянко, ст. препод. Н.В.Байдина

Редактор и корректор Г.Н.Кириллова

Компьютерная верстка Н.А.Старкова

План 2002 г., № 105

Подписано в печать с оригинала-макета

Формат 60 ´ 84 1/16. Бумага для множ. апп. Печать офсетная.

Усл. печ. л. 2,75. Уч.-изд. л. 2,75. Тираж 600.

Заказ Цена

Издательство Петербургского государственного университета путей сообщения. 190031, СПб., Московский пр., 9.

Типография ПГУПС. 190031, СПб., Московский пр., 9.

Дата добавления: 2015-11-26