Если не так то извини...
1. Любая база данных состоит из простейших объектов, называемых полем и записью. Совокупность полей и записей составляет более крупный объект – таблицу.
2. Не знаю, но думаю так.
Поле – простейший объект базы данных предназначенный для хранения параметра реального объекта или процесса.
На практике для каждого из параметров описываемого объекта отводят отдельное поле.
Запись – совокупность логически связанных полей, характеризующих свойства реального объекта. Для однозначного определения каждой записи таблица должна иметь уникальный ключ. По значению ключа отыскивается единственная запись. Ключ – поле, которое однозначно определяет соответствующую запись.
Таблица - это основные объекты любой базы данных. Во-первых, в таблицах хранятся все данные, имеющиеся в базе, а во-вторых, таблицы хранят структуру базы данных (поля, их тип и свойства).
Запросы. Эти объекты служат для извлечения данных из таблиц и предоставления их пользователю в удобном виде. С запросов выполняют такие операции, как отбор данных, их сортировку и фильтрацию. С запросов можно выполнять преобразование данных по заданному алгоритму, создавать новые таблицы, выполнять автоматическое наполнение таблиц данными, импортированными из других источников, выполнять простейшие вычисления в таблицах и многое другое.
{#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.
