Ввод данных в одномерный массив

Ввод данных в массив можно осуществлять несколькими способами.

const
  N = 5;
var
  m:array[1..N] of integer;
begin
  m[1]:=5;
  m[2]:=7;
  m[3]:=6;
  m[4]:=8;
  m[5]:=2;
end.

Ввод данных используя цикл

const
  N = 5;
var
  m:array[1..N] of integer;
begin
  for i:=1 to N do
    Read(m[i]);
end.

Ввод данных используя генератор случайных чисел

const
  N = 5;
var
  m:array[1..N] of integer;
begin
  for i:=1 to N do
    m[i]:=Random(10);
end.

Ввод данных из файла

const
  N = 5;
var
  m:array[1..N] of integer;
begin
  for i:=1 to N do
    m[i]:=Random(10);
end.