Категория
Информатика
Тип
реферат
Страницы
3 стр.
Дата
29.05.2014
Формат файла
.html — Html-документ
Архив
1029768.zip — 2.38 kb
  • algoritmicheskie-jazyki-obrabotka-odnomernyx-massivov_1029768_1.html — 5.24 Kb
  • Readme_docus.me.txt — 125 Bytes
Оцените работу
Хорошо  или  Плохо


Текст работы

ЛАБОРАТОРНАЯРАБОТА

по дисциплине“Основы программирования”

на тему

Алгоритмическиеязыки: обработка одномерных массивов


Цель работы: получение навыков работыс массивами, их вода и вывода, закрепление навыков организации программциклической структуры.

Постановказадачи:

1. Изучитьспособы описания и использования массивов, алгоритмы сортировки массивов, сортировкувыбором, вставками и обменную сортировку. Так же алгоритмы поиска элемента внеупорядоченном и упорядоченном массивах.

2. Разработать алгоритм и составить программу для решениязадачи соответствующего варианта.

3. Подобратьнаборы тестовых данных.

Заданиек работе: 1. Еслив массиве нет повторяющихся элементов, то упорядочить его по возрастанию.

2. Набрать программу, отладить ее, протестировать.Распечатать текст программы и результаты ее работы на тестовых данных.


Ходвыполнения работы

1. Наборытестовых данных

Первый набор тестовых данных: {0,9,8,7,6,5,32,6,4,3}

Второй набор тестовых данных: {2,4,16,23,34,45,76,91,98,100}

2.Текст программы

PROGRAM LAB5;

PROCEDURE SORT_MAS(SIZ:WORD;a:array ofbyte);

VAR

S:BYTE;K,i:WORD;

BEGIN

REPEAT

S:=0;

BEGIN

FOR K:=3 downTO 1 DO

BEGIN

FOR I:=0 TO (SIZ-K) DO

BEGIN

IF (A[I]>A[I+1]) THEN

BEGIN

A[I]:=A[I]+A[I+1];

A[I+1]:=A[I]-A[I+1];

A[I]:=A[I]-A[I+1];

S:=1

END

END

END

END;

UNTIL S=0;

WRITELN('Массив после упорядочивания: ');



Ваше мнение



CAPTCHA