Navigation alternative
Figures / Images
BBgraf
MetaPost
PSTricks
Format SVG
Asymptote
EPiX
Gnuplot
TeXGraph
Librairie GD
PostScript
SWFtools
Calculs
BC
Giac / Xcas
Maxima
Pari / GP
Scilab
Scripts p*
Documents
TeX au collège
TeX png
Lua(La)TeX
Cours etc.
Contributions
Le cours d'Ismaël
Astronomie
Bases
Base Brevet
Base Collège
Base Graphisme
Base Ipe
Base JPS (BBgraf)
Base MetaPost
Base PSTricks
Dépôt Git
Fichier JPS
Accueil
Présentation
Exemples
Papiers
Banque d'images
Albums et animations
Formulaires
Célébrités
Postscript
Chimie
Documentation
Sources et téléchargement
Édition du fichier 3D_43.jps
Retour
%autocrop 20 setxunit %quadrillage marks -22 9 setxrange -5.5 14 setyrange %% le plan de base /P1 {-9 -3} def /P2 {4 -5} def /P3 {8.5 0} def /a {-6 6 0} def /b {6 6 0} def /c {6 -6 0} def /d {-6 -6 0} def /s {0 0 11.4} def /s' {s pop 0} def /alpha 35 def /beta 170 def /vect_I {alpha cos alpha sin .5 mulv} def /vect_J {beta cos beta sin .9 mulv} def /vect_K {0 1} def %% [O vect_I] (->) ligne %% [O vect_J] (->) ligne %% [O vect_K] (->) ligne /xyz2xy { 3 dict begin /z exch def /y exch def /x exch def vect_I x mulv vect_J y mulv vect_K z mulv addv addv end } def [/A /B /C /D /S /S'] [a b c d s s'] {xyz2xy} capply mapnp /dotscale {2 dup} def [S'] {times} plot 1.2 setlinewidth [A D C S] ligne [A S D] ligne gsave .8 setlinewidth pointilles [A B C] ligne [B S S'] ligne grestore 2 setlinewidth [-12 P2 P1 xdpoint P2 P3] ligne 12 setfontsize setTimesItalic (A) A dltext (B) B ultext (C) C urtext (D) D drtext (S) S ultext (s) S' brtext (H) P2 (0 7) ultext
\vbox {\hsize 70mm \parindent 0pt La base $ABCD$ de la pyramide ci-contre est dans un plan ho\-ri\-zon\-tal $H$. La projection horizontale du sommet $S$ est le centre $s$ du carré $ABCD$. On note $V$ le plan vertical passant par $C$ et perpendiculaire à $(DI)$ ($I$ étant le milieu de $[AB]$). $\bullet $ Tracer l'intersection de $V$ et du plan vertical $BSD$. On note $T$ l'intersection de $V$ et de $[SD]$. $\bullet $ Tracer l'intersection de $V$ et de la pyramide. }
/fillstyle {.9 setgray fill} def /linearc .5 store .8 setlinewidth /dx_boxit 2 def /dy_boxit 2 def boxit xmin 4 [1.5 dup] urtexlabel
Tapez les 3 lettres : AWE