Для забезпечення цілісності даних у субд ввикористовують а) спеціальні таблиці
б) спеціальні форми
в)зв'язки між таблицями
г) спеціальні модулі даних

1) F=Av(¬A&B)
По закону дистрибутивности раскроем скобки
(Av¬A)&(AvB)
Av¬A = 1, значит остаётся AvB

2) F =A&(¬AvB)
По тому же закону раскрываем скобки
(A&¬A)v(A&B)
A&¬A = 0, значит остаётся A&B

3. (AvB)&(¬BvA)&(¬CvB)
По закону склеивания (AvB)&(¬BvA) = A , получается, что выражение принимает вид
A&(¬CvB)
Можно раскрыть скобки, получим
A&¬C v A&B

4) F =(1v(AvB))v((AC)&1) 
Скобка (1v(AvB)) = 1, так как 1 v ЧТОУГОДНО = 1
Получаем выражение
1v((AC)&1) = 1, так как 1 v ЧТОУГОДНО = 1
ответ 1

var
a:real;
b:real;
c:real;
x1,x2,x3:integer;
y1,y2,y3:integer;
p:real;
s:real;
begin
writeln('первые координаты треугольника x ');
readln(x1);
writeln('вторые координаты треугольгика x ');
readln(x2);
writeln('третьи координаты треугольгика x ');
readln(x3);
writeln('четвертые координаты треугольгика y ');
readln(y1);
writeln('пятые координаты треугольгика y ');
readln(y2);
writeln('шестые координаты треугольгика y ');
readln(y3);
a:=sqrt(x2-x1)+ (y2-y1);
b:=sqrt(x3-x2)+(y3-y2);
c:=sqrt(x3-x1)+(y3-y1);
p:=a+b+c;
s:=sqrt(p*(p-a)*(p-b)*(p-c));
writeln('Периметр = ',p:2:0);
writeln('Площадь=',s:1:2);
readln;
end.