Как запустить Конструктор таблиц?
​2. Как заполнить данными таблицу, созданную в режиме Конструктора?
​3. Как ввести тип поля в режиме Конструктора?
​4. Каково основное свойство любого поля?
​5. Какие типы полей используются для данных в базе данных?​

Поле является составной частью типа Запись (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.

{#1 Деление на числа меньше 7}

begin

var F: boolean;

var a: integer; read(a);

 for var x := 7 downto 1 do

 begin

   F := (a mod x = 0) ? true : false;

   if F <> true then break;

 end;

end.

{#2 Находится ли точка внутри окружности}

begin

 var F: boolean;

 var z: cardinal;

 var x,y: double; read(x,y,z);

  x := (x<1)? x*-1:x;

  y := (y<1)? y*-1:y;

  if (x<z) and (y<z) then  

 F := true;

end.

{#3 В трехзначном числе есть три одинаковые цифры}

begin

 var F: boolean;

 var n: integer; read(n);

 var s := n.ToString;

 if (s[1] = s[2])  

    or (s[2] = s[3])  

     or (s[1] = s[3]) then

 F := true;

end.

{#4 Точки лежат на одной прямой}

begin

 var F: boolean;

 var x1,y1,x2,y2,x3,y3: integer;

 read (x1,y1,x2,y2,x3,y3);

 if (x2 - x1)*(y3 - y1) - (x3 - x1)*(y2 - y1) = 0 then

 F := true;

end.

{#5 Х или трёхзначное чётное число или четырёхзначное нечётное}

begin

var F: boolean;

var x:integer; read(x);

var s:=x.ToString;

if ((length(s) = 3) and (x mod 2 = 0)) or ((length(s) = 4) and (x mod 2 <> 0)) then

F := true;

end.