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

Задача.

1. Формулировка задачи:

Задан одномерный массив целых чисел. Найти количество нечётных чисел среди элементов массива.

2. Таблица идентификаторов

№	Наименование переменной	Обозначения в программе
	Имя массива	a
	Размер массива	n
	Индекс массива	i
	Количество нечетных чисел	kol

3. Листинг программы

program lab5;

uses

crt;

var

a: array [1..100] of integer;

n, i,kol: integer;

begin

clrscr;

writeln ('Введите размер массива n<=100');

readln (n);

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

for i:=1 to n do

readln (a[ i ]);

kol:=0;

for i:=1 to n do

if odd(a[ i ]) then kol:=kol+1;

writeln(‘Количество нечетных = ’, kol);

readln;

end.

Вопросы для самоконтроля

1. Что такое массив?
2. Будут ли сохранены данные массива в памяти компьютера после окончания работы программы?
3. Что такое индекс массива?
4. Какого типа должны быть переменные, являющиеся индексами массива?
5. Как можно задавать размер массива?
6. Может ли реальное количество элементов в массиве быть меньше, чем указано при описании?
7. Может ли реальное количество элементов в массиве быть больше, чем указано при описании?

11.4. Методические указания для выполнения практического задания №7. «Операции с индексированными переменными»

Цель работы: Ознакомиться со способом хранения однотипной информации в поименованном наборе, массиве,

Задание:

1. В приложении 8 выбрать вариант задания.

2. Выполнить практическое задание №7, используя пример программы обработки одномерного массива.

3. Составить блок-схему алгоритма.

4. Написать программу и отладить ее по заранее подготовленному тесту.

5. Оформить задание в тетради для практических работ.

6. Результат выполнения программы предъявить преподавателю.

7. Ответить на вопросы самоконтроля.

8. Защитить выполненную работу у преподавателя.

Приложение 8. Таблица вариантов заданий

Вариант	Задание
	Даны натуральное n, целые числа а1, …, аn, каждое из которых отлично от нуля. Если в массиве отрицательные и положительные элементы чередуются (+, -,+, - … или -, +, -, +, …), то ответом должен служить исходный массив. Иначе получить все отрицательные элементы массива, сохранив порядок их следования.
	Даны натуральное n и действительные числа a1, …, an (n - четное). Получить max (a1+ an, a2+ an-1, …, an/2+ a(n/2)+1).
	Даны натуральное число n, действительные числа a1, …, an. Найти максимальный среди отрицательных элементов имеющих четные индексы.
	Даны натуральное n, действительные числа a1, …, an. Получить числа в1, в2, …, вn, где вi – среднее арифметическое всех элементов массива а1, …, аn, кроме аi (i = 1, 2, …, n).
	Даны натуральное n, действительные числа a1, …, an. Если в результате замены отрицательных элементов массива a1, …, an их квадратами элементы будут образовывать неубывающую последовательность, то получить сумму элементов исходного массива; в противном случае получить их произведение.
	Даны натуральное n, m, целые числа a1, …, an, b1, …, bm. Найти сумму тех элементов массива a1, …, an, индексы которых совпадают со значением элементов массива b1, …, bm.
	Даны натуральное n, действительные числа a1, …, an (все числа попарно различны). Поменять в этом массиве местами наибольший и наименьший элементы.
	Даны натуральное n, действительные числа a1, …, an. Получить преобразованный массив, заменяя a i нулями, если | ai | не равно max (a1, …, an), и заменяя a i единицей в противном случае (i = 1, 2, …, n).
	Даны натуральное n, действительные числа a1, …, an (все числа попарно различны). Поменять в этом массиве местами наименьший и последний элементы.
	Даны натуральное n, действительные числа a1, …, an, b1, …, bn. Получить новый массив с1, …, сn, каждый элемент которого сi = max (ai, bi), i = 1, 2, …, n.
	Даны натуральное n, действительные числа a1, …, an, b1, …, bn. Преобразовать b1, …, bn по правилу: если ai < 0, то bi увеличить в 10 раз. Иначе bi заменить нулем, i = 1, 2, …, n.
	Даны натуральное n, действительные числа a1, …, an. Требуется умножить элементы массива a1, …, an на квадрат ее наименьшего элемента, если ai ³ 0. И на квадрат ее наибольшего члена, если ai < 0.
	Даны натуральное n, действительные числа a1, …, an. Вычислить сумму тех элементов массива, индексы которых являются степенями двойки: (1, 2, 4, 8, 16, …).
	Даны натуральные n, m, действительные числа a1, …, an, b1, …, bm. Элементы каждого из массивов упорядочены по не убыванию. Объединить элементы этих двух массивов в один массив с1, …, сn + m так, чтобы они снова оказались упорядочены по не убыванию.
	Даны натуральные n, m, действительные числа a1, …, an и b1, …, bm. Найти наименьший среди элементов a1, …, an, который не входит в b1, …, bm.
	Даны натуральные n, целые числа a1, …, an. Найти сумму неповторяющихся элементов массива.
	Даны натуральные n, целые числа a1, …, an. Наименьший элемент массива a1, …, an заменить целой частью среднего арифметического всех элементов, остальные элементы оставить без изменения. Если в массиве несколько элементов со значением min (a1, …, an), то заменить последний по порядку.
	Даны натуральные n, целые числа a1, …, an. Преобразовать массив по правилу: все отрицательные элементы перенести в его начало, а все остальные в конец, сохраняя исходное взаимное расположение как среди отрицательных, так и среди остальных элементов.
	Даны натуральные n, действительные числа a1, …, an (n – чётное). Получить min (a1 * an, a2 * an-1, …, a[n/2] * a[n/2]+1).
	Даны натуральные n, действительные числа a1, …, an. Преобразовать массив, расположив элементы в обратном порядке.
	Даны натуральное n, действительные числа a1, …, an. Все элементы массива с четными номерами, предшествующие первому по порядку элементу со значением max (a1, …, an), умножить на max (a1, …, an).
	Даны натуральное n, целые числа a1, …, an. Найти сумму квадратов тех элементов массива, которые по модулю больше максимального элемента.
	Даны натуральное n, действительные числа a1, …, an. Если в результате замены отрицательных элементов массива a1, …, an их квадратами элементы будут образовывать неубывающую последовательность, то получить сумму элементов исходного массива; в противном случае получить их произведение.
	Даны натуральное n, действительные числа a1, …, an. Найти максимальный элемент массива среди отрицательных элементов, имеющих четные индексы.
	Даны натуральное n, действительные числа a1, …, an. Получить преобразованный массив, заменяя ai нулями, если | ai | не равно max (a1, …, an), и заменяя ai единицей в противном случае.
	Даны натуральное n, действительные числа a1, …, an (все числа попарно различны). Поменять в этом массиве местами наименьший и наибольший элементы.
	Даны натуральное n, действительные числа a1, …, an. Вычислить сумму тех элементов массива, индексы которых являются степенями тройки (1, 3, 9, 27, …).
	Даны натуральное n, действительные числа a1, …, an. Если в результате замены отрицательных элементов массива a1, …, an их квадратами элементы будут образовывать невозрастающую последовательность, то получить произведение элементов исходного массива; в противном случае получить их сумму.
	Даны натуральное число n, действительные числа a1, …, an. Найти максимальный элемент среди отрицательных элементов имеющих нечетные индексы.
	Даны натуральное n, действительные числа a1, …, an. Найти произведение индексов отрицательных элементов массива.

Дата добавления: 2014-12-27