Лабораторная работа 7(4 ч)
Программирование с использованием массивов
Цели:
- Научиться писать программы, обрабатывающие массивы и элементы массивов.
Массив это упорядоченная совокупность конечного числа данных одного типа. Простейшим примером массива может служить линейная таблица. Значения, образующие линейную таблицу, являются элементами массива, а их порядковые номера в таблице называются индексами. Индекс определяет положение элемента массива относительно его начала.
Общая форма описания переменной-массива:
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. | |
Ввести массив и число . Для каждого элемента массива вычислить функцию . Найти сумму чётных элементов введенного массива. |