Página 254 - Coordinación de servicios de Información

J 0 REM PROGRAMA PARA EL CALCULO DE LA V E N T I L A C I Ó N NATURAL
2 0 REM " D I M E N S I O N A M I E N T Q DE ABERTURAS"
3 0 REM
4 0 REM PRIMERA ETAPA " C A L I D A D DEL A I R E "
5 0 REM ENTRADA DE DATOS
5 5 CLS
6 0 I N P U T "CUAL ES LA ALTURA L I B R E I N T E R I O R DE LA H A B I T A C I Ó N ? ( i n ) " ! H
7 0 INPUT "CUAL £ 5 EL LARGO DE LA H A B I T A C I Ó N ? { m ) " ; L A R G O
8 0 I N P U T "CUAL ES EL ANCHO DE LA H A B I T A C I Ó N ? ( m > " i A N C H O
9 0 C L 3
1 0 0 I N P U T " C U A N T A S PERSONAS H A B I T A N EL CUARTO?" ; P
1 1 0 CLS
1?I3 P R I N T "Ce = 0 , 0 0 0 3 ( A I R E TOTALMENTE FURO)
' 1 3 0 P R I N T " C e = 0 . 0 0 0 5 ( A I R E MEDIANAMENTE PURO) "
1 4 0 P R I N T "Ce? = 0 . 0 0 0 7 ( A I R E DE T i P O URBANO)"
1 5 0 P R I N T "
1 6 0 I N P U T "CUAL ES LA C A L I D A D DE A I R E QUE SE I N T R O D U C E ? {Ce)"íCE
173 C L S
1 8 0 REM V E N T I L A C I Ó N REQUERIDA
1 9 0 L E T V = ( . 0 1 5 / ( . 0 0 1 - C £ ) t « P
2 0 0 REM RENOVACIÓN DE A I R E POR HORA „ .
2 1 0 L E T VOL= H » LARSO * ANCHO .- . - -
2 2 0 LET R = V / VOL
2.3S REM SEGUNDA ETAPA " D I S I P A C I Ó N DE CALOR" • - . -
2 4 0 REM ENTRADA DE DATOS
7T,9\ I N P U T "CUAL EB LA TEMPERATURA MAXIMA PROMEDIO DEL MES MAS CALUROSO? (ERADOS
C E L 3 I U S ) " ; T E
2 6 0 I N P U T "CUAL ES LA TEMPERATURA MAXIMA P E R M I S I B L E EN TÉRMINOS DE C O N F D R T ? " ; T I
2 6 5 C L S
2 7 0 INPUT "CUAL ES LA GANANCIA C A L O R I F I C A TOTAL GANADA POR LA ESTRUCTURA ( R A D I A C
ION SOLAR D I R E C T A * D I F U S A ) ¡ w a t t s ) ? " í W E
2150 I N P U T "CUALES SDN LAS GANANCIAS C A L O R Í F I C A S APORTADAS POR APARATOS ELECTRODO
M E S T I C O B ? ( w a - t t s ) " ;WI
2 9 0 C l ^ -
3 0 0 LET U = U E + y i + ( 1 1 5 * P Ì
3 1 0 LET N = U / ( . 3 3 3 3 » V 0 L » ( T 1 - T E ) )
3 2 0 LET 0 1 = (N * V O L ) / 3 6 0 0
3 3 0 REM TERCERA ETAPA "AREA DE LA VENTANA-
3 4 0 •
3 5 0 I N P U T "CUAL ES LA V E L O C I D A D M E D I A DEL V I E N T O EN EL MES MAS CALUROSO? í m / s e g .
) " ¡ V E L O C I D A D
3 6 0 I N P U T "CUAL ES EL ÁNGULO DE I N C I D E N C I A DEL V I E N T O CON RESPECTO AL PLANO DE L
A V E N T A N A ? " ; I N C
5 7 H REM AREA DE LA VENTANA
Zm L E T AREA = Q i / ¡ . 5 9 7 1 1 0 3 » VELOCIDAD * S l N t l N C • 3 . 1 4 1 5 9 2 / 1 6 0 M
3 9 0 REM AREA DE LA ABERTURA DE ENTRADA
Am L E T AE = AREA
41C0 REM AREA D E . L A ABERTURA DE S A L I D A
4 ? n L E T AS = AREA » 1 . 2 5
5 0 0 REM CUARTA ETAPA EFECTO STACK
5 1 0 REM ENTRADA DE DATOG
5 2 0 I N P U T "CUAL ES LA D I F E R E N C I A DE ALTURA ENTRE LA ABERTURA DE ENTRADA Y LA DE
S A L I D A S ( m ) " ; H
SAG