Лабораторная работа 7. Программирование с использованием массивов. Примеры решений задач. Задания

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

Программирование с использованием массивов

Цели:

- Научиться писать программы, обрабатывающие массивы и элементы массивов.

Массив это упорядоченная совокупность конечного числа данных одного типа. Простейшим примером массива может служить линейная таблица. Значения, образующие линейную таблицу, являются элементами массива, а их порядковые номера в таблице называются индексами. Индекс определяет положение элемента массива относительно его начала.

Общая форма описания переменной-массива:

Var <имя>: array [<размер массива>] of <тип-элементов>;

Например:

Var a: array [1..10] of Integer;

Выбор отдельной компоненты одномерного массива осуществляется указанием идентификатора массива, за которым в квадратных скобках следует индекс. Например: M[1], M[2], …, M[N].

Примеры решений задач

1.Создать массив, размером в 10 элементов. Элементы массива вводить с клавиатуры. Вывести на экран элементы, больше числа 3.

Program Massiv;

Var a: array [1..10] of Integer;

i: Integer;

Begin

For i := 1 to 10 do read(a[i]); // Вводим элементы массива

For i := 1 to 10 do

Begin

If a[i] > 3 then WriteLn(a[i]);

End;

End.

2.Найти максимальное число в массиве.

Program Maximum;

Var a: array [1..10] of Integer;

n, m: Integer;

Begin

For n := 1 to 10 do Read(a[n]); // Ввод элементов массива

m := a[1];

For n := 2 to 10 do

Begin

If a[n] > m then m := a[n];

End;

WriteLn('Максимальное число = ', m);

End.

Задания

Осуществить ввод данных в массив. Осуществить ввод числа. Значения функции выводить в виде таблицы, состоящей из двух колонок (одна – для значений элементов массива, другая – для значений функции). Вывести найденную сумму или произведение, согласно варианту.

Таблица 3.1 — Варианты заданий

Вариант	Задание
	Ввести массив и число . Для каждого элемента массива вычислить функцию . Найти произведение элементов введенного массива, больших .
	Ввести массив и число . Для каждого элемента массива вычислить функцию . Найти сумму целых элементов введенного массива.
	Ввести массив и число . Для каждого элемента массива вычислить функцию . Найти произведение дробных элементов введенного массива.
	Ввести массив и число . Для каждого элемента массива вычислить функцию . Найти сумму элементов введенного массива, кратных числу 3.
	Ввести массивы и . Для каждого и вычислить функцию . Найти произведение нечётных элементов введенных массивов.
	Ввести массивы и . Для каждого и вычислить функцию . Найти сумму дробных положительных элементов введенных массивов.
	Ввести массив и число . Для каждого элемента массива вычислить функцию . Найти произведение чётных элементов введенного массива.
	Ввести массив и число . Для каждого элемента массива вычислить функцию . Найти сумму элементов введенного массива, меньших числа 5.
	Ввести массив и число . Для каждого элемента массива вычислить функцию . Найти произведение целых элементов введенного массива.
	Ввести массив и число . Для каждого элемента массива вычислить функцию . Найти сумму элементов введенного массива, кратных числу 2.
	Ввести массив и число . Для каждого элемента массива вычислить функцию . Найти произведение элементов введенного массива, некратных числу 3.
	Ввести массив и число . Для каждого элемента массива вычислить функцию . Найти сумму чётных элементов введенного массива.