包含 foreach 循环时出现问题

Question 1

问题出在let需要分配并找到foreach替代的语法上。

为了解决这个问题，我将放在了循环let内部foreach。为了避免绘制和着色三角形 3 次，我只在循环外部执行了一次。

您的代码给出了负角度，我在这里修改了减法：

\n\k={atan2(\y{\k1},\x{\k1})-atan2(\y{\k2},\x{\k2})}

经过：

\n\k={atan2(\y{\k2},\x{\k2})-atan2(\y{\k1},\x{\k1})}

\documentclass{standalone}
\usepackage{tikz}\usetikzlibrary{angles,quotes,calc}
\begin{document}
\begin{tikzpicture}
\coordinate (A1) at (0,0);
\coordinate (A2) at (2,5);
\coordinate (A3) at (4,-1);
\coordinate (A4) at (A1);
\coordinate (A0) at (A3);
\filldraw[fill=green](A1)--(A2)--(A3)--cycle;
\foreach \k in {1,2,3}{
\path%[fill=green]
    let
    \p{\k1}=($(A\the\numexpr\k-1)-(A\k)$),
    \p{\k2}=($(A\the\numexpr\k+1)-(A\k)$),
    \n\k={atan2(\y{\k2},\x{\k2})-atan2(\y{\k1},\x{\k1})}
     in 
% (A1)--(A2)--(A3)--cycle
{pic[draw,
    "{$\pgfmathparse{\n\k}%
    \pgfmathprintnumber[fixed,precision=2]{\pgfmathresult}$}",
    angle eccentricity=2.5]
    {angle = A\the\numexpr\k-1\relax--A\k--A\the\numexpr\k+1}};
    }
\end{tikzpicture}


\end{document}

Answer

问题出在let需要分配并找到foreach替代的语法上。

为了解决这个问题，我将放在了循环let内部foreach。为了避免绘制和着色三角形 3 次，我只在循环外部执行了一次。

您的代码给出了负角度，我在这里修改了减法：

\n\k={atan2(\y{\k1},\x{\k1})-atan2(\y{\k2},\x{\k2})}

经过：

\n\k={atan2(\y{\k2},\x{\k2})-atan2(\y{\k1},\x{\k1})}

\documentclass{standalone}
\usepackage{tikz}\usetikzlibrary{angles,quotes,calc}
\begin{document}
\begin{tikzpicture}
\coordinate (A1) at (0,0);
\coordinate (A2) at (2,5);
\coordinate (A3) at (4,-1);
\coordinate (A4) at (A1);
\coordinate (A0) at (A3);
\filldraw[fill=green](A1)--(A2)--(A3)--cycle;
\foreach \k in {1,2,3}{
\path%[fill=green]
    let
    \p{\k1}=($(A\the\numexpr\k-1)-(A\k)$),
    \p{\k2}=($(A\the\numexpr\k+1)-(A\k)$),
    \n\k={atan2(\y{\k2},\x{\k2})-atan2(\y{\k1},\x{\k1})}
     in 
% (A1)--(A2)--(A3)--cycle
{pic[draw,
    "{$\pgfmathparse{\n\k}%
    \pgfmathprintnumber[fixed,precision=2]{\pgfmathresult}$}",
    angle eccentricity=2.5]
    {angle = A\the\numexpr\k-1\relax--A\k--A\the\numexpr\k+1}};
    }
\end{tikzpicture}


\end{document}

Question 2

不太清楚您想要获得什么（您应该提供一个草图，说明您想要什么）。看看下面的图片是否显示了所需的结果：

使用angle库和\pgfmathsetmacro命令，它的代码很简单：

\documentclass{standalone}
\usepackage{tikz}\usetikzlibrary{angles,quotes,calc}
\begin{document}
\begin{tikzpicture}
\coordinate (A1) at (0,0);
\coordinate (A2) at (2,5);
\coordinate (A3) at (4,-1);
\coordinate (A4) at (A1);
\coordinate (A0) at (A3);
\draw (A1)--(A2)--(A3)--cycle;
\foreach \i in {1,2,3}
    \pgfmathsetmacro{\j}{int(\i-1)}
    \pgfmathsetmacro{\k}{int(\i+1)}
\path   pic [draw,fill=red!30, radius=3mm]  
    {angle = A\j--A\i--A\k};
\end{tikzpicture}
\end{document}

除了使用之外，\pgfmathsetmacro{...}{...}您还可以定义新的计数器：

\foreach \i [count=\j from 0, count =\k from 2] 
    in {1,2,3}
\path   pic [draw,fill=red!30, angle radius=3mm]  
    {angle = A\j--A\i--A\k};

附录：现在，当期望的结果更加清晰时，您可以按照以下方式添加角度值（这是AndréC 回答，代码中的差异用 % <---) 表示：

\documentclass{standalone}
\usepackage{tikz}
\usetikzlibrary{angles, arrows.meta,                            % <---
                calc, 
                quotes}

\begin{document}
\begin{tikzpicture}[       > = {Straight Barb[angle=60:2pt 3]}, % <---
/pgf/number format/precision = 1                                % <---
                    ]
\coordinate (A0) at (0,0); % <---
\coordinate (A1) at (2,5);
\coordinate (A2) at (4,-1);
\draw[fill=green!30] (A0)--(A1)--(A2)--cycle;
%
\foreach \i in {0,1,2}
{
    \pgfmathsetmacro{\j}{int(Mod(\i-1,3))} % <---
    \pgfmathsetmacro{\k}{int(Mod(\i+1,3))} % <---
\path   let \p1=($(A\j)-(A\i)$),           % <---
            \p2=($(A\k)-(A\i)$) in         % <---
    pic [draw, <->,                        % <---
         angle radius=9mm, angle eccentricity=1.3, 
         font=\scriptsize, % <---
         "{\pgfmathsetmacro{\ang}{atan2(\y2,\x2)-atan2(\y1,\x1)} % <---
          \pgfmathprintnumber[fixed,precision=1]{\ang}}"         % <---
         ]
    {angle = A\j--A\i--A\k};
}
\end{tikzpicture}
\end{document}

Answer