Нарисуйте квадрат с данными точками.

Нарисуйте квадрат с данными точками.

Даны точки A и B. Я хочу нарисовать квадрат с вершинами A и B. введите описание изображения здесь

Конечно, существуют два возможных квадрата вместе с отрезком AB.

Сначала я думал, что это можно нарисовать, используя "rotate around={90:(A)}". Это хорошо подходит для перемещения точки, но не подходит для рисования наклонного квадрата.

Другой способ — использовать перпендикулярную линию, проходящую через точку B. Но для этого требуется длина AB. Поэтому коды получаются слишком сложными.

Я думаю, что есть простой метод нарисовать квадрат с заданными вершинами. Не могли бы вы дать мне знать?

решение1

Вы можете воспользоваться calcбиблиотекой.

\documentclass[border=1cm]{standalone}
\usepackage{tikz}
\usetikzlibrary{calc}
\begin{document}
\begin{tikzpicture}
       \coordinate (A) at (0,0);
       \coordinate (B) at (3,1);
       \fill (A) circle (0.1);
       \fill (B) circle (0.1);
       \draw (A) node[below] {A} -- (B) node[below] {B} -- ($ (B)!1!-90:(A) $) -- ($ (A)!1!90:(B) $) -- cycle;
\end{tikzpicture}
\end{document}

Квадрат

решение2

Пакет tkz-euclideимеет множество функций для создания геометрических построений, включая построение квадрата по двум заранее заданным координатам:

\tkzDefSquare(A,B)
\tkzGetPoints{C}{D}

Первая строка определяет квадрат на основе Aи B. Вторая получает координаты последних двух углов и создает именованные координаты Cи D.

\documentclass[border=1cm]{standalone}
\usepackage{tkz-euclide}
\begin{document}
\begin{tikzpicture}
       \coordinate (A) at (0,0);
       \coordinate (B) at (3,1);
       
       \tkzDefSquare(A,B)
       \tkzGetPoints{C}{D}
       
       \tkzDrawPoints[size=8](A,B,C,D)
       \tkzDrawPolygon(A,B,C,D)
\end{tikzpicture}
\end{document}

решение3

Что-то вроде этого? tikz/turn— хороший выбор. введите описание изображения здесь

\documentclass[tikz, border=1cm]{standalone}
\usepackage{xparse}
\makeatletter
\NewDocumentCommand { \mysquare } { s O{} D(){a} D(){b} }
  {
    \tikz@scan@one@point\pgf@process(#3)
    \pgf@xa = \pgf@x
    \pgf@ya = \pgf@y
    \tikz@scan@one@point\pgf@process(#4)
    \pgfmathsetmacro{\square@l}{
      sqrt( (\pgf@x - \pgf@xa)^2 + (\pgf@y - \pgf@ya)^2 )
    }
    \def\square@sign{}
    \IfBooleanT { #1 } { \def\square@sign{-} }
    \draw[#2] (#3) -- (#4)
      -- ([turn]\square@sign 90:\square@l pt)
      -- ([turn]\square@sign 90:\square@l pt)
      -- cycle;
  }
\makeatother

\begin{document}
\begin{tikzpicture}
\coordinate [label=below left:$A$] (a) at (0, 0);
\coordinate [label=right:$B$] (b) at (2, 3);
\coordinate [label=above:$C$] (c) at (2, 1);
\mysquare[thick](a)(b)
\mysquare*[thick, red](a)(c)
\end{tikzpicture}
\end{document}

Связанный контент