Q$(b8Vvd>k}^qRdist temw tddi}tem30Zwatcel KWktalbalbeLrad enerinterc enerabsor enerintercepradrefSradabsoDradabsSADEYA INFORTECNICAtegromradstefcopredukitradeskteradref2albe2radabso2rads2kw2tem2tetvlsmSADEYA/INFORTECNICA"m6CONSTANTES SOLARES Y RADIACION RECIBIDA POR UN PLANETAmDistancia en Km (1) en u.a. (2)" d^}mDistancia en u.a." fp V[^}m Distancia Km VJ^ef Vd pnOp d dew hkm$Temperatura en la zona: K, celsius = d  wat = tem * 4.85eV Vfnd vn m#K: Energa incidente en watios/m2 =" mK/K0=" eV d mkw/tem=" mAlbedo estandar del planeta= m5Reduccin radiancia en porcentaje x/100 por erupcin=" Z Zedn " INPUT "Radio del planeta Km"; rad kI@p d vp kI@p d vpd wnp p p } w  }w kp@d)d!xvp eVn >eVd wnpnd >pn 8 8O 8 8O  k>p D k>p m*Retencin trmica planeta grad (Tierra=35) S tef = rads * cop * 1.2587mAlbedo circunstancial =" mRadiacin ec reflejada w/m2= }m'Radiacin ec absorbida (retenida) w/m2="   d gm1Radiacin retenida por unidad de superficie w/m2="  PRINT "radabs/tem="; itkdC m  D v tef = tem * kte + cop d wnp      S LmTemperatura albedo="  ew9 PRINT "Temperatura - albedo: K,cent.="; tem2; tem2 - 273m Temperatura efectiva: K, cent. = L Lewq[ <