3
\documentclass[12pt,pstricks,border=15pt]{standalone}
\usepackage{newcent,pst-eucl} 
\begin{document}

\begin{pspicture}[showgrid](-5,-5)(8,6)
\pstGeonode[PosAngle={180,0,-90,90}](-3,0){A}(3,0){C}(-1,-1){B}(0,5){S}
\pstTranslation[PosAngle=45]{B}{A}{C}[D]
\pstCircleABC[linestyle=none]{S}{A}{C}{I}
\pstInterLL[PosAngle=-60]{A}{C}{B}{D}{H}
\psline(S)(A)(B)(S)(C)(B)

\pstRightAngle{D}{H}{I}
\pstRightAngle{B}{H}{I}

\psset{linestyle=dashed}
\psline(B)(D)(A)(C)(D)(S)
\ncline{H}{I} \naput{$x$}
\ncline{A}{I} \naput{$R$}
\psset{SegmentSymbol=pstslash}
\pstSegmentMark{S}{I}
\pstSegmentMark{A}{I}
\end{pspicture}
\end{document}

enter image description here

  • The pst-solides3d package defines a rightangle object. – Bernard Dec 26 '18 at 12:42
  • @Bernard I have just read pst-solides3d but I can't use it for my problem. what should i do? – user173875 Dec 26 '18 at 13:11
4
\documentclass[12pt,pstricks]{standalone}
\usepackage{pst-eucl} 
\begin{document}

\begin{pspicture}[showgrid](-4,-2)(4,6)
\pstGeonode[PosAngle={180,0,-90,90}](-3,0){A}(3,0){C}(-1,-1){B}(0,5){S}
\pstTranslation[PosAngle=45]{B}{A}{C}[D]
\pstCircleABC[linestyle=none]{S}{A}{C}{I}
\pstInterLL[PosAngle=-60]{A}{C}{B}{D}{H}
\psline(S)(A)(B)(S)(C)(B)

\bgroup
    \psset{PointName=none,PointSymbol=none}
    \pstGeonode([nodesep=10pt]{I}H){t}([nodesep=10pt]{B}H){l}([nodesep=-10pt]{B}H){r}
    \pstTranslation{H}{l}{t}[a1]
    \pstTranslation{H}{r}{t}[a2]
    \psline(l)(a1)(t)(a2)(r)
\egroup

\psset{linestyle=dashed}
\psline(B)(D)(A)(C)(D)(S)
\ncline{H}{I} \naput{$x$}
\ncline{A}{I} \naput{$R$}
\psset{SegmentSymbol=pstslash}
\pstSegmentMark{S}{I}
\pstSegmentMark{A}{I}
\end{pspicture}
\end{document}

enter image description here

Secret Recipes

enter image description here enter image description here enter image description here enter image description here

| improve this answer | |

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service, privacy policy and cookie policy