Составить программу, которая определяет, являются ли разные точки с координатами (x1,y1) и (x2, y2) симметричными относительно осей координат или начала координат. прочертить путь выполнения алгоритма для следующих значений параметров: а) x1= -1, y1=6, x2=1, y2=6. б) x1=6, y1=7, x2=1, y2=6
var x1,x2,y1,y2:real;
begin
readln(x1,y1,x2,y2);
if((x1=x2)and(y1=-y2))or((x1=-x2)and(y1=y2))or((x1=-x2)and(y1=-y2))then writeln('ДА')else writeln('НЕТ');
end.