ЛАБОРАТОРНАЯ РАБОТА 21

Составление, отладка и использование простейших программ обработки массивов. 

Цель урока: Выработать умение по созданию простейших программ обработки массивов на языке Turbo Pascal.

Оборудование: компьютеры Р-4 Программное обеспечение: Turbo Pascal

ПОРЯДОК ВЫПОЛНЕНИЯ

I уровень

Массив – это структурированный тип данных, состоящий из фиксированного числа элементов одного типа. Элементы массива могут быть целого, вещественного, строкового, литерного и др. типов. Максимальное количество элементов массива называется размерностью массива и определяется при описании массива. Если в форме описания массива задан один индекс – это одномерный массив (линейная таблица), если два индекса – двухмерный массив (прямоугольная таблица, матрица). Для обозначения массива используется служебное слово ARRAY. Например, описать одномерный массив А из 10 элементов можно так:

VAR A: ARRAY[1…10] OF integer;

Проанализируйте ход составления программы, введите ее в компьютер и получите результат.

Задача 1 Дан массив A, состоящий из 5 элементов целого типа. Вычислите сумму элементов этого массива.

PROGRAM Primer 1;

VAR s: integer;

i: integer;

A: array [1…5] of integer;

BEGIN

For i:=1 to 5 do

BEGIN

WRITELN (‘Введите ',I, ‘ элемент массива'); READLN (A[i]);

END;

WRITELN (‘Элементы исходного массива');

For i:=1 to 5 do

WRITE (A[i]:5 );

S:=0;

For i:=1 to 5 do

S:=S+A[i];

WRITELN (‘Сумма равна ',S)

END.

II уровень

Задача 2 Подсчитайте количество положительных элементов заданной таблицы А [1…10].

Задача 3 Даны 2 таблицы А[1…40] и В[1…40]. Построить таблицу С, каждый элемент которой равен сумме соответствующих элементов таблиц А и В, и таблицу D, в которой каждый элемент равен произведению соответствующих элементов таблиц А и В.

III уровень

Задача 4 Дан одномерный массив А из k вещественных чисел. Необходимо найти в этом массиве наибольший (максимальный) по величине элемент и его индекс.

Задача 5 Дан одномерный массив C [1…n]. Найдите среднее арифметическое элементов массива.

Вопросы

1. Какой структурированный тип данных называют массивом?
2. Что понимается под размерностью массива?
3. Каким образом описывается массив в языке Turbo Pascal?