Файл – это… 1. Единица измерения информации 2.Программа в оперативной памяти 3.Текст, распечатанный на принтере 4. Программа или данные на диске

1. Единица измерения информации

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

При описании типа данных Запись (record) используют поля, которые описывают характерные свойства данной записи. Запись может содержать информацию о различных объектах реальной жизни (машина, человек, радиоприёмник и пр.), а каждая запись содержит информацию, которая характеризует описываемый объект с той, или иной стороны.

Например, для записи Машина могут быть заданы поля, содержащие информацию о марке автомобиля, его цвете, объёме двигателя, количестве дверей и наличии откидывающейся крыши.

Для записи Человек можно выделить поля для хранения имени, фамилии и отчестве человека, номер и серию его паспорта, возраст и т.д.

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

Например:

type
  parants = record
     name, surname : string;
     age : byte;
     phone : string;
  end;

  students = record
     name, surname : string;
     age : byte;
     mother : parents;
     father : parent;
  end;

var student : students;

begin
  with student do begin
     name := 'Вася';
     surname := 'Пупкин';
     age := 15;
     mother.name := 'Ирина';
     mother.surname := 'Пупкина';
     mother.phone := '+7 (916) 123-45-67';
  end;
end.

Const
  n = 20;

var
  a: array[1..n] of integer;
  b: array[-5..11] of integer;
  i, j, m: integer;

begin
  //Заполнение массива и подсчет кол-ва каждого из интервала
  // от -5 до 11
  writeln('Исходный массив');
  for i := 1 to n do
  begin
    a[i] := random(17) - 5;
    inc(b[a[i]]);
    write(a[i]:4);
  end;
  writeln;
  //Сортировка и вывод массива
  writeln('Отсортированный массив');
  for i := 1 to n - 1 do
  begin
    for j := i + 1 to n do
    begin
      if a[i] > a[j] then begin
        m := a[i];
        a[i] := a[j];
        a[j] := m;
      end;
    end;
  end;
  for i := 1 to n do write(a[i]:4);
  writeln;
 
  //Вывод количества чисел из интервала
 
  for i := -5 to 11 do
  begin
    writeln('Число:', i:4, ' кол-во: ', b[i]:4);
  end;
end.

Тестовое решение:
Исходный массив
   9   4   6   1   8  -5   9   0  -1   0   7   7  -1  -3  -1  -2   7   3  11   4
Отсортированный массив
  -5  -3  -2  -1  -1  -1   0   0   1   3   4   4   6   7   7   7   8   9   9  11
Число:  -5 кол-во:    1
Число:  -4 кол-во:    0
Число:  -3 кол-во:    1
Число:  -2 кол-во:    1
Число:  -1 кол-во:    3
Число:   0 кол-во:    2
Число:   1 кол-во:    1
Число:   2 кол-во:    0
Число:   3 кол-во:    1
Число:   4 кол-во:    2
Число:   5 кол-во:    0
Число:   6 кол-во:    1
Число:   7 кол-во:    3
Число:   8 кол-во:    1
Число:   9 кол-во:    2
Число:  10 кол-во:    0
Число:  11 кол-во:    1