Var
a:array[1..3,1..2]of real;
b:array[1..3]of real; //массив для координат пересечения сторон с ОХ
i,j,z:integer;
// (y1-y2)x+(x2-x1)y+(x1y2-x2y1)=0 - ур-е прямой, прохоходящей через 2 точки
// тогда x=(x2y1-x1y2)/(y1-y2) - координата ее пересечения с осью х
// найдем координаты пересечения сторон с осью х
function cross(x1,x2,y1,y2:real):real;
begin
result:=(x2*y1-x1*y2)/(y1-y2);
if ((result>x1) and (result>x2)) or ((result<x1) and (result<x2)) then
result:=1 //это точка пересечения не самой стороны, а ее продолжения
//поскольку в дальнейшем нам нужны будут знаки координат,
//ей приписываем положительной значение, чтобы она не влияла
//на конечный результат
end;
begin
for i:=1 to 3 do
begin
writeln('Введите координаты х,у вершины:');
readln(a[i,1],a[i,2]);
end;
z:=1;
for i:=1 to 3 do
begin
j:=i+1;
if j>3 then j:=1;
b[i]:=cross(a[i,1],a[j,1],a[i,2],a[j,2]);
z:=sign(b[i])*z;
end;
write('Начало координат ');
if z<0 then writeln('принадлежит треугольнику')
else writeln('не принадлежит треугольнику');
<span>end.</span>
Программист - это человек который пишет программу например текстовый редактор или калькулятор.
Пользователь - это человек который пользуется этой программой а именно - печатает текст в текстовом редакторе или же считает математические примеры в калькуляторе который написал программист.
<span>первый IPv6 = 3212:21.2.12.4
второй IPv4 = 72.5.102.84</span>
Например так:
использовать Чертежник
алг
нач
опустить перо
сместиться на вектор (6,6)
сместиться на вектор (6,-6)
сместиться на вектор (-12,0)
поднять перо
кон
Еще смотря какой треугольник надо (равносторонний, прямоугольный, тупоугольный и т.д. и т.п.)
F= ¬A*B+¬(A*B)
F=¬A*B+¬A+¬B
F=¬A(B+1) +¬B
F=¬A+¬B
A B ¬A ¬B F
0 0 1 1 1
0 1 1 0 1
1 0 0 1 1
1 1 0 0 0
----------------------------------------------------------------------
F=¬( (A+¬C)*¬C)
F=¬(A+¬C) +C
F=¬A*C+C
F=C(¬A+1)
F =C (F не зависит от A)
A C F
0 0 0
0 1 1
1 0 0
1 1 1
------------------------------------------------
F=¬(B*¬(¬C+¬D))
F=¬(B*C*D)
B C D B*C*D F
0 0 0 0 1
0 0 1 0 1
0 1 0 0 1
0 1 1 0 1
1 0 0 0 1
1 0 1 0 1
1 1 0 0 1
1 1 1 1 0
