PRISMA A BASE TRIANGOLARE


CONOSCENZE LOGO:
ASDISCO - DISCO - CATALOGO - CONSERVA - RECUPERA - LC - LP - STAMPA - SE - RADQ - FRASE - PER - FINE - RIPETI - ASMODO - MODO - CIAO - PT - ASCAMPO - CAMPO - GIU - SU - MT - NT - PS - AVANTI - DESTRA - INDIETRO - SINISTRA - TANA - VAXY - DOVE - AS - PROCEDURE - PROGRAMMAZIONE STRUTTURATA

CONOSCENZE MATEMATICHE:
Conoscenza dei triangoli. Formule dirette e inverse. Concetto di superficie e volume. Riduzione.


PER PRISMA3
MENU
DISEGNA
FINE

PER MENU
ASMODO 3
QUI "ANCORA
PT
ST [PRISMA A BASE TRIANGOLARE]
ST []
ST [SCEGLI IL TRIANGOLO DI BASE: EQUILATERO - RETTANGOLO -ISOSCELE (E / R / I)]
AS "SCELTA LC
SE NON ELE? :SCELTA [E R I] [VAI "ANCORA]
SE ELE? :SCELTA [E] [EQUILATERO]
SE ELE? :SCELTA [R] [RETTANGOLO]
SE ELE? :SCELTA [I] [ISOSCELE]
FINE

PER EQUILATERO
ST []
ST [DIGITA LA MISURA DEL LATO DI BASE] AS "BBASE LP
ST [DIGITA LA MISURA DELL'ALTEZZA DEL PRISMA] AS "ALTEZZA LP
AS "OBLIQUO :BBASE
AS "HBASE (:BBASE / 2 * RADQ 3)
AS "PERIMETRO (:BBASE * 3)
ST []
CALCOLI
ST []
STAMPA_RISULTATI
RIDUZIONE
CALCOLI
ASMODO 4 PS SU NT
VAXY [-80 -80] ASDIR 270 A :BBASE / 2 AS "A DOVE
ASDIR 90 A :BBASE AS "B DOVE
ASDIR 45 A :HBASE / 2 ASDIR 270 A :BBASE / 2 AS "C DOVE
FINE

PER ISOSCELE
ST []
ST [DIGITA LA MISURA DELLA BASE DEL TRIANGOLO] AS "BBASE LP
ST [DIGITA LA MISURA DELL'ALTEZZA DEL TRIANGOLO] AS "HBASE LP
ST [DIGITA LA MISURA DELL'ALTEZZA DEL PRISMA] AS "ALTEZZA LP
AS "OBLIQUO (RADQ ((:BBASE / 2) ^ 2 + :HBASE ^ 2))
AS "PERIMETRO (:BBASE + :OBLIQUO * 2)
ST []
CALCOLI
ST []
STAMPA_RISULTATI
RIDUZIONE
CALCOLI
ASMODO 4 PS SU NT
VAXY [-80 -80] ASDIR 270 A :BBASE / 2 AS "A DOVE
ASDIR 90 A :BBASE AS "B DOVE
ASDIR 270 A :BBASE / 2 ASDIR 45 A :HBASE / 2 AS "C DOVE
FINE

PER RETTANGOLO
ST []
ST [DIGITA LA MISURA DELLA BASE DEL TRIANGOLO] AS "BBASE LP
ST [DIGITA LA MISURA DELL'ALTEZZA DEL TRIANGOLO] AS "HBASE LP
ST [DIGITA LA MISURA DELL'ALTEZZA DEL PRISMA] AS "ALTEZZA LP
AS "OBLIQUO RADQ (:BBASE ^ 2 + :HBASE ^ 2)
AS "PERIMETRO (:BBASE + :HBASE + :OBLIQUO)
ST []
CALCOLI
ST []
STAMPA_RISULTATI
RIDUZIONE
CALCOLI
ASMODO 4 PS SU NT
VAXY [-80 -80] AS "A DOVE
ASDIR 90 A :BBASE AS "B DOVE
ASDIR 45 A :HBASE / 2 AS "C DOVE
FINE

PER CALCOLI
AS "AREAB (:BBASE * :HBASE / 2)
AS "AREAL (:PERIMETRO * :ALTEZZA)
AS "AREAT (:AREAB * 2 + :AREAL)
AS "VOLUME (:AREAB * :ALTEZZA)
FINE

PER STAMPA_RISULTATI
ST (FRASE [PERIMETRO ... =] :PERIMETRO)
ST (FRASE [AREA BASE ... =] :AREAB)
ST (FRASE [AREA LATERALE =] :AREAL)
ST (FRASE [AREA TOTALE . =] :AREAT)
ST (FRASE [VOLUME ...... =] :VOLUME)
ST [PREMI UN TASTO] AS "TASTO LC
FINE

PER DISEGNA
BASE
SPIGOLI
BASESUP
FINE

PER BASE
SU VAXY :A GIU
VAXY :B VAXY :C VAXY :A
FINE

PER SPIGOLI
ASDIR 0
SU VAXY :A GIU A :ALTEZZA AS "A1 DOVE
SU VAXY :B GIU A :ALTEZZA AS "B1 DOVE
SU VAXY :C GIU A :ALTEZZA AS "C1 DOVE
FINE

PER BASESUP
SU VAXY :A1 GIU
VAXY :B1 VAXY :C1 VAXY :A1
FINE

PER RIDUZIONE
SE (OPPURE :BBASE>80 :HBASE>100 :ALTEZZA>160) [
AS "BBASE (:BBASE/2) AS "HBASE (:HBASE/2)
AS "ALTEZZA (:ALTEZZA/2) AS "OBLIQUO (:OBLIQUO/2)
AS "PERIMETRO (:PERIMETRO/2) RIDUZIONE]
SE (AMB :BBASE<30 :HBASE<30 :ALTEZZA<30) [
AS "BBASE (:BBASE*2) AS "HBASE (:HBASE*2)
AS "ALTEZZA (:ALTEZZA*2) AS "OBLIQUO (:OBLIQUO*2)
AS "PERIMETRO (:PERIMETRO*2) RIDUZIONE]
FINE


PRISMA A BASE TRIANGOLARE
LATO DI BASE 100

ALTEZZA DEL PRISMA

160
PERIMETRO 300
AREA LATERALE 48000
VOLUME 692820.32
AREA BASE 4330.127
AREA TOTALE 56660.254