2.2. Черепашка выполнила записанную последовательность команд – и получилась фигура, представленная на рисунке. Укажите на

рисунке, где было начальное положение черепашки. Запишите

пропущенные команды.

по

назад 40 направо 90 вперед 20

вперед 40 назад 40 налево 90 вперед 40

вперед 40 назад 40 направо 90

направо 90 вперед 120

пп

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

type TXY = record x, y: Real end;
function sqt(a, b, c: TXY): Real;
begin  
sqt:=abs((a.x-b.x)*(c.y-b.y)-(a.y-b.y)*(c.x-b.x))/2;
end;
const  
eps=1e-4;  
o: TXY = (x:0; y:0);
var   a, b, c: TXY;  
s1, s2, s3: Real;
begin  
Write('Введите координаты вершин треугольника: ');
ReadLn(a.x,a.y,b.x,b.y,c.x,c.y);  
s1:=sqt(o,a,b); s2:=sqt(o,b,c); s3:=sqt(o,a,c);  
Write('Центр координат лежит ');  
if abs(s1)<eps then WriteLn('на стороне AB')  
else if abs(s2)<eps then WriteLn('на стороне BC')  
else if abs(s3)<eps then WriteLn('на стороне AC')  
else if abs(s1+s2+s3-sqt(a,b,c))<eps then WriteLn('внутри треугольника')   else WriteLn('вне треугольника');
end.