Студопедия

Главная страница Случайная страница

КАТЕГОРИИ:

АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника






Этапы решения задачи. 1. Определим переменные, которые будем использовать в программе: имя массива A, размер массива N, индекс массива i






1. Определим переменные, которые будем использовать в программе: имя массива A, размер массива N, индекс массива i, флажок f, дополнительная переменная для обмена местами соседних элементов P.

2. Составим блок-схему алгоритма и программу сортировки элементов массива.

  program massiv3; var a: array [1…100] of integer; f, i, n, p: integer; begin writeln ('введите размер массива n='); readln (n); writeln ('введите элементы массива'); for i: =1 to n do begin Write(‘a[‘, i, ’]=’); readln (a[i]); end; repeat f: =0; for i: =1 to n-1 do if a[ i ]> a[i+1] then begin p: =a[ i ]; a[ i ]: =a[i+1]; a[i+1]: =p; f: =1; end; until f=0; for i: =1 to n do writeln (‘a[‘, i, ’ ]=’, a[ i ]); end.  

3. Существует много способов сортировки элементов массива. В данном алгоритме используются вложенные циклы. Внутренний цикл (for …) – позволяет один раз просмотреть массив, сравнивая соседние элементы. В случае, если предыдущий элемент (A[ i ]) окажется больше последующего (A[ i +1]), элементы меняются местами через дополнительную переменную p. Внешний цикл(repeat…until) – повторяется до тех пор, пока массив не будет упорядочен. В программе применяется переменная – флажок:

f =1 – признак того, что два соседних элемента менялись местами, массив еще не упорядочен; f =0 – признак того, что массив упорядочен.

4. Выполним программу в среде Pascal ABC.NET (см. п.3.1.4).

 

3.4.4. Варианты заданий по теме «Программирование задач на обработку одномерных массивов»

Задание
  Дано: массив А(N). Вычислить сумму элементов массива, кратных 3 и количество отрицательных элементов.
  Дано: массив А(N). Найти сумму его элементов с четными номерами, количество нечетных элементов. Размер произвольный.
  Дано: массив А(N). Найти среднее арифметическое его элементов с нечетными номерами. Размер массива произвольный.
  Дано: массив А(N). Найти произведение элементов, принадлежащих интервалу [-10, 30]. Размер массива произвольный.
  Дано: массив А(N). Найти наибольший элемент и его номер в массиве. Поменять местами первый и максимальный элемент.
  Дано: массив А(N). Найти среднее арифметическое элементов массива, больших некоторого числа С. Размер массива произвольный. Значение С вводится произвольно.
  Дано: массив А(N). Вычислить произведение и количество нечетных элементов массива. Размер массива произвольный.
  Дано: массив А(N). Упорядочить массив по убыванию. Вычислить произведение элементов массива с чётными индексами.
  Дано: массив А(N). Вычислить среднее арифметическое элементов с чётными индексами.
  Дано: массив А(N). Упорядочить массив по возрастанию. Вычислить сумму элементов с нечётными индексами в упорядоченном массиве.
  Дано: массив А(N). Сформировать новый массив В, состоящий из положительных элементов массива А. Размер массива произвольный. Вычислить сумму элементов в полученном массиве.
  Дано: массив А(N). Найти наименьший нечетный элемент массива и его номер. Размер массива произвольный.
  Дано: массив А(N). Сформировать новый массив В, состоящий из положительных элементов массива А и найти в нем наибольший элемент. Размер массива произвольный.
  Дано: массив А(N). Сформировать новый массив В, состоящий из нечетных элементов массива А и найти в нем сумму элементов.
  Дано: массив А(N). Сформировать новый массив В, состоящий из элементов массива А, принадлежащих интервалу [1; 30], упорядочить его по возрастанию. Размер массива произвольный.
  Дано: массив А(N). Найти количество элементов массива, значение которых больше, чем среднее арифметическое его элементов.
  Дано: массив А(N). Подсчитать, сколько раз в массиве встречается максимальный элемент.
  Дано: массив А(N). Найдите наибольший индекс отрицательного элемента.
  Дано: массив А(N). Каждый чётный элемент массива заменить числом 10.
  Дано: массив А(N). Найти максимальный и минимальный элементы массива и поменять их местами.

Поделиться с друзьями:

mylektsii.su - Мои Лекции - 2015-2024 год. (0.007 сек.)Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав Пожаловаться на материал