4294

Освоение приемов объявления, обращения и использования массивов при решении задач

Лабораторная работа

Информатика, кибернетика и программирование

Цель работы: освоение приемов объявления, обращения и использования массивов при решении задач. Типовые алгоритмы обработки одномерных массивов Рассмотрим некоторые типовые алгоритмы обработки массивов. Положим, что в декларативной части программы о...

Русский

2012-11-15

64.5 KB

16 чел.

Цель работы: освоение приемов объявления, обращения и использования массивов при решении задач.

Типовые алгоритмы обработки одномерных массивов

Рассмотрим некоторые типовые алгоритмы обработки массивов. Положим, что в декларативной части программы описаны следующие переменные: одномерные массивы А и В, переменные целого типа n, i и j и вспомогательные переменные типа элементов массива.  

1. Суммирование элементов массива

Реализация:

s:=0;    

for i:=1 to n  do

             s:=s+a[i];

writeln('Сумма  элементов=  ', s);

2. Суммирование элементов массива по ключу

Реализация:

s:=0;    

writeln(‘ Введите ключ’);

readln( key);

for i:=1 to n  do

             if a[i]=key then s:=s+a[i];

writeln('Сумма  элементов= ', s);

3. Подсчет элементов массива по ключу

Реализация:

kol:=0;    

writeln(‘ Введите ключ’);

readln( key);

for i:=1 to n  do

             if a[i]=key then kol:=kol+1;

writeln('Количество  элементов= ', kol);

4. Поиск минимального (максимального) элемента

Данный алгоритм заключается в следующем: вначале запоминаем номер первого элемента массива, принимая его за минимальный (максимальный) элемент. Далее, начиная со второго, все элементы сравниваются с предполагаемым минимумом (максимумом) и если какой-нибудь из них меньше (больше) предполагаемого минимума (максимума), то запоминается номер этого элемента. Эти действия повторяются до тех пор, пока не закончатся элементы массива. Ниже написан фрагмент программы для поиска минимального элемента. Для реализации алгоритма введем еще один объект программы n_min, переменную, в которой будет храниться номер минимального элемента.

Реализация:

writeln(‘ Введите количество элементов массива’);

readln(n);

write(' Введите элементы массива’);

for i:=1 to n do readln(a[i]);

{ Пусть первый элемент минимальный }

 n_min:=1;

for i:=2 to n do

         if a[i]<a[n_min] then  n_min:=i;

writeln('Минимальный элемент массива:  ', a[n_min]);

writeln('Номер элемента: ', n_min);

5. Формирование нового массива из элементов исходного массива

Для формирования нового массива из элементов исходного необходимо, прежде всего, подготовить переменную целого типа, которая будет, является индексом элементов для нового массива, и увеличивать значение номера элемента после того, как очередной элемент помещен в новый массив. Рассмотрим два алгоритма: формирование нового массива из элементов исходного массива, удовлетворяющих заданному условию (< key); слияние двух упорядоченных массивов в один упорядоченный.

Реализация:

{Формирование нового массива по ключу}

writeln(‘ Введите ключ’);

readln( key);

j:=0; {индекс нового массива}

For i:=1 to n do

                   If a[i] < key then

                                           begin

                                             j:=j+1;

                                             b[j]:=a[i]

                                            end;

{Печать сформированного массива}

for i:=1 to j do writeln(‘b[‘, i, ‘]= ’, b[i]);

6. Поиск элемента в массиве по ключу

Df: Процесс нахождения элемента в последовательности по значению одного или более чем одного поля называется поиском в последовательности. Линейный поиск заключается в последовательном просмотре всех элементов массива до тех пор пока либо будет найден искомый элемент, либо пока не закончатся элементы массива. Для реализации алгоритма заведем переменную логического типа flag, с помощью которой можно будет выйти из цикла в случае нахождения искомого элемента.

Реализация:

write(' Введите образец для поиска');

readln(key);

flag:=FALSE; {совпадений нет}

i:=1;

repeat

       if  a[i] = key   then flag:=TRUE     {совпадение с образцом}

                              else i:=i+1;         {переход к следующему элементу}

until (i>n) or flag; {окончание цикла, если произошло совпадение с образцом или проверены все элементы массива}

if flag   then writeln(' Совпадение с элементом номер которого = ', i)       

           else writeln(' Совпадений с образцом нет');

7. Инвертирование массива

Суть алгоритма, состоит в перестановке элементов массива в обратном порядке, т.е. меняет местами первый с последним элементом, второй с предпоследним элементом массива и т.д. Число перестановок  равно n div 2, т.к. если менять местами элементы n раз, то все элементы массива встанут на свои места.

Реализация:

   for i:=1 to n div 2  do

             begin

             { Обменяем i-й и (n-i+1)-й элементы}

                 temp:=a[i];

                 a[i]:=a[n-i+1];

                 a[n-i+1]:=temp

              end;

8. Циклический сдвиг элементов массива  вправо (влево) на М позиций

При решении задач, в которых необходимо вставить элемент в массив используется циклический сдвиг элементов. В этом алгоритме сначала запоминаем последний элемент, если сдвиг будем делать вправо (первый элемент, если сдвиг влево). Затем сдвигаем элементы, т.е. на n место ставим n-1 элемент, на n-1 ставим n-2,  и т.д. на 2-е место ставим 1-й элемент, тем самым как бы освободив первую позицию. Наконец, на первое место записываем последний элемент, который хранится во вспомогательной переменной.  Подобные действия повторяются m раз, т.е. число раз, на которое необходимо осуществить сдвиг. Мы рассмотрели циклический сдвиг на m позиций вправо.

Реализация:

{Циклический сдвиг на m позиций вправо}

writeln(‘ Введите число сдвигов’);

readln( m);

for i:=1 to m do

              begin

              {Запоминаем последний элемент массива}

                temp:=a[n];

              {Сдвиг элементов массива на одну позицию вправо}

                for j:= n downto 2 do  a[j]:=a[j-1];

                a[1]:= temp

               end;

{Печать измененного массива}

for i:=1 to n do writeln(‘a[‘, i, ‘]= ’, a[i]);

9. Сортировка массива

Df: Под сортировкой будем понимать процесс перестановки объектов заданного массива в определенном порядке. Сортировка выбором. Этот метод основан на поиске элемента. Выбирается элемент с наименьшим ключом и меняется местами с первым элементом. Затем выбирается элемент с наименьшим ключом среди оставшихся n-1 элементов и меняется местами со вторым и т.д. Алгоритм  сортировки основан на типовом алгоритме поиска минимума (максимума).

Реализация:

{Сортировка массива по возрастанию методом выбора}

for i:=1 to n-1 do

    begin

        { Поиск минимального элемента в части массива от a[i] до a[n]}

         n_min:=i;

         for j:=i+1 to n do

              if a[j]<a[n_min] then n_min:=j;

         { Поменяем местами a[n_min] и a[i] }

         temp:=a[i];

         a[i]:=a[n_min];

         a[n_min]:=temp

    end;

{Выведем отсортированный массив}

for i:=1 to n do write(a[i],'  ');

Задания для самостоятельного решения.

Вариант 1.

1. Одномерный массив А длиной N<=20 заполнить случайными числами из диапазона [–10..55]. Составить программу определения:

  •  первого максимального элемента массива;
    •  количество максимальных элементов в массиве;
    •  всех элементов, кратных 3-м или 5-и.

2. Дан одномерный массив. Переместить нулевые элементы массива в конец, сдвинув остальные элементы влево.

3. Имеются сведения о количестве проданных билетов в 17-ти вагонах поезда. Найти наименее загруженный вагон, учитывая, что количество мест в вагоне зависит от типа вагона: в мягком и купейном вагонах — по 36 мест, а в плацкартном — 46 мест.

Вариант 2. 

1. Одномерный массив А длиной N<=50 заполнить случайными числами из диапазона [–5..30]. Составить программу определения:

  •  последнего максимального элемента;
    •  на каких позициях находятся максимальные элементы;
    •  сколько элементов массива превосходят по модулю заданное число M?

2. Дан одномерный массив. Переместить нулевые элементы массива в начало, сдвинув остальные элементы вправо.

3. Даны сведения о двухстах абитуриентах: фамилии и оценки, полученные на трех вступительных экзаменах. Напечатать список будущих студентов при условии, что норма приема — 40 человек, а зачисляются абитуриенты, набравшие наибольшую сумму баллов.

Вариант 3.

1. Одномерный массив А длиной N<=30 заполнить случайными числами из диапазона [-10..60]. Составить программу определения:

  •  последнего минимального элемента;
    •  на каких позициях находятся минимальные элементы;
    •  есть ли в данном массиве два соседних положительных элемента? Найти номера первой пары.

2. Дан одномерный массив. Переместить минимальные элементы в начало, сдвинув остальные элементы вправо.

3. Известно количество денег у каждого из N учеников, а также стоимость 4 комплексных обедов в школьной столовой. Напечатать сколько каких обедов будет куплено и сколько учеников останутся голодными, если каждый ученик выбирает наиболее дорогой обед, который он может купить.

Вариант 4.

1. Одномерный массив А длиной N<=20 заполнить случайными числами из диапазона [–15..80]. Составить программу определения:

  •  первого минимального элемента массива;
    •  количества и суммы  минимальных элементов;
    •  есть ли в данном массиве два соседних отрицательных элемента? Найти номера последней пары.

2. Дан одномерный массив. Переместить максимальные элементы в конец, сдвинув остальные элементы влево.

3. Имеются сведения о 40-и регионах страны: название региона и информация об уровне безработицы в регионе. Определите три наиболее благополучных и три неблагополучных района.

Вариант 5.

1. Одномерный массив А длиной N<=20 заполнить случайными числами из диапазона [–15..-5]. Составить программу определения:

  •  суммы положительных элементов массива;
    •  количества четных элементов массива;
    •  минимального из элементов, значения которых лежат в диапазоне [y1..y2].

2. Дан одномерный массив. Переместить максимальные элементы в начало, сдвинув остальные элементы вправо.

3. Имеется информация о 100 предприятиях города в виде: название предприятия, число работающих, прибыль. Определить предприятие с максимальной прибылью с учетом количества работающих на нем людей.

Вариант 6.

1. Одномерный массив А длиной N<=50 заполнить случайными числами из диапазона [–15..20]. Составить программу определения:

  •  первого отрицательного элемента массива;
    •  суммы четных элементов массива.
    •  количества элементов, значения которых лежат в диапазоне [y1..y2].

2. Дан одномерный массив. Переместить минимальные элементы в конец, сдвинув остальные элементы влево.

3. Имеются сведения об обеспеченности жильем N работников предприятия: фамилия работника, количество человек в семье, количество кв. метров жилой площади. Также известно количество K новых квартир, которые получает предприятие. Требуется отпечатать список K работников, претендующих на новое жилье, полагая, что у всех работников разное количество кв. метров на человека.

Вариант 7.

1. Одномерный массив А длиной N<=40 заполнить случайными числами из диапазона [–25..10]. Составить программу определения:

  •  первого четного элемента массива;
    •  суммы элементов массива значения, которых лежат в диапазоне [y1..y2];
    •  количества элементов массива больших заданного значения M.

2. Дан одномерный массив. Переместить четные элементы в конец, сдвинув остальные элементы влево.

3. В конкурсе «Мисс Очаровашка» участвуют 100 девушек. Известен балл, набранный каждой девушкой в ходе первого тура конкурса. Определить десять девушек вышедших во второй тур конкурса.

Вариант 8.

1. Одномерный массив А длиной N<=25 заполнить случайными числами из диапазона [–18..10]. Составить программу определения:

  •  первого положительного элемента массива;
    •  максимального среди четных элементов массива;
    •  количества отрицательных элементов массива значения, которых лежат в диапазоне [y1..y2].
  1.  Дан одномерный массив. Переместить нечетные элементы в начало, сдвинув остальные элементы вправо.
  2.  Известно количество голосов, поданных за каждого из 10 кандидатов на пост мэра Челябинска. Выяснить, избран ли мэр, если для избрания требуется набрать более 50 % голосов “за” или какие два кандидата вошли во второй тур (если никто из кандидатов не набрал 50 % голосов).

Вариант 9.

1. Одномерный массив А длиной N<=55 заполнить случайными числами из диапазона [–30..30]. Составить программу:

  •  определить первый элемент массива кратный 5-и;
    •  найти среднее значение максимального и минимального элементов массива;
    •  заменить первые k элементов на противоположные по знаку.

2. Дан одномерный массив. Переместить положительные элементы в конец, сдвинув остальные элементы влево.

3. Известна балансовая стоимость 100 станков завода. Определить десять станков с максимальной   балансовой стоимостью, а также вычислить амортизационные отчисления завода, если за каждый станок они составляют 10% его стоимости.

Вариант 10.

1. Одномерный массив А длиной N<=40 заполнить случайными числами из диапазона [–20..50]. Составить программу:

  •  определить последний положительный элемент массива кратный 3-м;
    •  заменить максимальный по модулю отрицательный элемент нулем;
    •  найти все индексы отрицательных элементов массива.

2. Дан одномерный массив. Переместить отрицательные элементы в начало, сдвинув остальные элементы вправо.

3.  Руководство ведет каждый месяцам учет расходов фирмы. Получена информация за n месяцев. Расставить данные по расходам в порядке в их возрастания.

Отчет должен содержать:

  •  Математическую или логическую модель задачи.
  •  Функциональную структуру алгоритма.
  •  Программный код задачи.
  •  Тесты для проверки правильности работы программного кода.

Контрольные вопросы:

  1.  Дайте определение понятию массив.
  2.  Назовите и охарактеризуйте свойства массива.
  3.  Какие типы массивов существуют, и чем они отличаются друг от друга?
  4.  Что такое логическое и физическое представление массива?
  5.  Как осуществляется доступ к элементу одномерного массива?
  6.  Опишите одномерный массив, состоящий из 30 элементов целого типа.

7. Дан массив целых чисел {Xi}=1, 2, -9, 0, -34, 7. Чему будет равно значение k=_____________?

k:=0;

for i:=1 to n do

if (X[i]>0) then k:=k+1;

8. Если элементы массива D[1..7] равны соответственно 4, 0, 7, 5, 6, 2, 4 то значение выражения D[ D[1] ] + D[ D[3] ] равно ...

9. Определите, что будет результатом выполнения фрагмента программы:

k:=1;

for i:=1 to 10 do

if A[i]> A[k] then k:=i;

10. Определите, что будет результатом выполнения фрагмента программы:

s:=0;

for i:=1 to 10 do

if A[i]>s then s:=A[i];


 

А также другие работы, которые могут Вас заинтересовать

35066. Социология. Социальное неравенство 196.66 KB
  Все общества за исключением простейшего охотников и собирателей характеризуются всеми тремя типами неравенства выделенными М. Неравенство характеризует неравномерное распределение дефицитных ресурсов общества денег власти образования и престижа между различными стратами или слоями населения. Неравенство существует во всех обществах. Неравенство выросло при охоте достигло максимума при земледелии и стало снижаться в индустриальном и постиндустриальном обществах.
35067. КАК Улучшить работу ума. Алгоритмы без программистов — это очень просто! 8.66 MB
  Маленькая увертюра 9 Третий глаз для бизнесменов и руководителей 11 Интеллектуальный терроризм: фантазия или реальность Вместо предисловия 13 Почему умные люди страдают и гибнут 13 Разве такая проблема существует 14 Информационный стресс зловещий спутник информационного общества 14 Камикадзе умственного труда 15 Что такое интеллектуальный терроризм 15 Гуманитарная постановка задачи 16 Компьютерная мифология: облегчают ли компьютеры умственный труд 18 Что такое...
35068. ПРАВОВЕДЕНИЕ Учебное пособие 895 KB
  Теория государства и права 5 Раздел 2. Основные положения гражданского права Российской Федерации 46 Раздел 5. Основы трудового права Российской Федерации 105 Раздел 7. Цель дисциплины дать понятия о системе права и ее отраслях что позволит студентам ориентироваться в правовых вопросах и самостоятельно осуществить защиту своих нарушенных прав; сформировать представления о сущности и основных направлениях Правоведения и развития современной России уяснение роли и места правовых дисциплин среди других...
35069. Післявоєнна відбудова народного господарства 41.5 KB
  Чоловіки пішли далі дорогами війни. За самовідданість у роки війни більше 300 трудящих району були нагороджені медаллю За доблесну працю у Великій Вітчизняній війні 19411945 р. Наслідки війни були трагічними вони давали про себе знати на кожному кроці.
35070. Наследственные аномалии сельскохозяйственных животных 203 KB
  4 Аномалии сельскохозяйственных животных обусловленные мутациями генов6 Аномалии у крупного рогатого скота.6 Аномалии у свиней8 Аномалии у лошадей.9 Аномалии у овец.
35071. ИСКУССТВО ПОДБОРА ПЕРСОНАЛА. Как оценить человека за час 995 KB
  Как же узнать кто из них соответствует этому определению а кто нет Существует множество подходов к подбору и оценке персонала и автор директор по персоналу компании Johnson Johnson рассматривает большинство из них. В последнее время все чаще появляются статьи о том что при оценке инвестиционных рисков и при определении рыночной стоимости компании анализируется команда: в ряде случаев только топменеджеры в ряде случаев команда полностью. В ситуации когда в компании нет специалиста отдела персонала никто не владеет приемами...
35072. s, p, d-элементы, имеющие биологическое значение 100.44 KB
  Na получают электролизом расплава хлорида натрия NaCl, с добавлением NаСl2, КСl и NaF для снижения температуры плавления электролита до 600°C. Аноды изготовлены из графита, катоды — из меди или железа. Электролиз расплава проводят в стальном электролизере с диафрагмой. Параллельно с Na электролизом получают Cl2
35073. Теория государства и права. Сборник статей 2.92 MB
  и права является как бы деятельностью второго порядка способом методом регуляции. Матузов вслед за многими другими авторами в своей работе призывает разграничивать понятия правовая коллизия и правовой конфликт указывая на то что конфликт это противоречие между людьми в отличие от коллизий представляющих собой противоречия между нормами права способные служить причиной поводом для конфликта. Она появилась еще во времена зарождения самого права.
35074. МОТИВАЦИЯ И СТИМУЛИРОВАНИЕ ПЕРСОНАЛА 2.48 MB
  В ней рассмотрены основные концепции и психологические аспекты мотивации труда методы стимулирования работников и мотивационные ресурсы управления организацией. Исследования мотивации труда проведенные автором на предприятиях различных форм собственности и сфер деятельности позволили ему предложить новую систему диагностики мотивации труда работников. Они позволят руководителям выбрать из многообразия ресурсов методов и схем управления наиболее близкую для себя систему формирования мотивационного механизма и учтя специфические...