Структура данных - массив. Часть 1 - 8 стр.

UptoLike

8
Следует отметить, что вычисление адреса связано с выполнением до-
полнительных операций, поэтому по возможности рекомендуется уменьшать
использование переменных с индексами.
3. ОДНОМЕРНЫЕ МАССИВЫ. КЛАССИФИКАЦИЯ ОПЕРАЦИЙ
3.1. Операции вводавывода
Опишем процедуру
Input ввода массива a[1..n] с клавиатуры:
const n_max=20;
type vect=array[1..n_max] of integer;
procedure Input(var n:integer;
var a:vect);
var i:integer;
begin
writeln(‘Задайте кол во, не превышающее’,n_max);
read(n);
writeln(‘Задайте элементы’);
for i:=1 to n do
read(a[i]);
end;
Опишем процедуру Output вывода массива a[1..n]:
const n_max=20;
type vect=array[1..n_max] of integer;
procedure Output(n:integer;
const a:vect);
var i:integer;
begin
writeln;
for i:=1 to n do
write(a[i]:5);
writeln
end;
Данные удобно хранить в файле на диске. Пусть создан текстовый
файл Dan.txt, в котором содержатся элементы массива. Файл с данными соз-