Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Otchet_po_infe№5.docx
Скачиваний:
3
Добавлен:
30.07.2019
Размер:
325.52 Кб
Скачать

Блок – схема алгоритма программы

1

Тестирование

Вводится размерность массива(n), сам массив(а), вставляемый элемент(х),если в массиве встречается отрицательный элемент то программа вставляет перед ним(х).

1:

Введите размер массива n=4

Введите исходный массив

A[1]=1

A[2]=2

A[3]=3

A[4]=-11

Введите вставляемый элемент: 1

Результирующий массив: 1 2 3 1 -11

Задача 4

Дан упорядоченный целочисленный массив. Сформировать второй массив всех таких различных значений, которые в первом массиве встречаются по два и более раза.

Работа программы

Вводится исходный массив(a[i]) хотя бы с 1 повторяющимся элементом, после чего программа строит новый массив(b[i]) из тех элементов которые встречались 2 и более раза в предыдущем массиве.

Назначение переменных

Назначение переменных, используемых в задаче, приведено в таблице 1

Таблица 1 – Назначение переменных

Переменная

Тип

Назначение переменной

a,b

Integer

Исходный массив(а), новый массив(b) построенный на основе массива(а).

I,n,j

Integer

Различные целочисленные константы используемые в теле программы.

Блок – схема алгоритма программы

k:=1

Нет

Да

A[i]=a[j]

B[k]:=a[i] k:=k+1

1

1

I:=1 to k-1

Вывод массива

Конец

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

uses crt;

var a,b:array[1..100] of integer;

i,n,j,k:integer;

begin

writeln('Введите 7 чисел каждый раз после ввода числа нажимайте enter ');

write;

n:=7;

randomize;

for i:=1 to n do

readln(a[i]);

k:=1;

for i:=1 to n do

for j:=i+1 to n do

if a[i]=a[j] then

begin

b[k]:=a[i];

k:=k+1;

end;

for i:=1 to k-1 do

write(b[i],' ');

readln;

end.

Тестирование

Вводится исходный массив(a[i]) хотя бы с 1 повторяющимся элементом, после чего программа строит новый массив(b[i]) из тех элементов которые встречались 2 и более раза в предыдущем массиве.

1:

Введите 7 чисел каждый раз после ввода числа нажимайте enter

1,2,3,4,5,5,4.

Новый массив 4,5.

Задача 5

Отсортировать массив по возрастанию, используя процедуру Obmen2, которая меняет местами 2 элемента.

Работа программы

Вводится размерность массива(n), путем рандома задается сам массив(а),после чего программа сортирует элементы массива в порядке возрастания.

Назначение переменных

Назначение переменных, используемых в задаче, приведено в таблице 1

Таблица 1 – Назначение переменных

Переменная

Тип

Назначение переменной

A

Array of Integer

Исходный массив(а)

I,N,J

Integer

Различные целочисленные константы используемые в теле программы.

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]