Un conjunto que pueda ser entendido por el emisor y el receptor, es un código.
¿Quien desarrolla los mejores códigos?
Códigos escritos que abren frentes.

Mac tiene varios frentes abiertos. Contra Macromedia con su versión Flash. Mac y Google luchan desarrollando tecnologías para dispositivos móviles.
Google como empresa en Internet gano el índice de usuarios a otros buscadores. En su expansión se encuentra competidores de todas las partes que componen la informática.
Bing de Microsoft compite contra Mac y contra Linux. Contra Yahoo y contra otras empresas libres en el mercado de Internet.

Nadie le perdonara, Facebook es un éxito y como todos en la vida cometemos errores. Quien sabe mi nombre en Internet, mi ip, un ciber, eres mi amigo en las redes ó no, tu ves mis fotos, a ti no te dejo ver mis fotos. Morbo, las redes sociales pueden ser como llevar un tatuaje en la frente, en un “frente” digital.

Bookmark and Share

10 * Programa basic para el cálculo de la altura de las mareas en un instante cualquiera

20 *

30* El listado es compatible para IBM Pc ó compatible

40*

50*

60* DEFDBL A-Z

70* PI=3.14159265359 #

80* CLS

90* INPUT ” amplitud marea en metros?,AM

100* INPUT “duración marea?,DCS

110* DC=VAL (LEFT$(DC$,2)) + VAL(RIGHT$(DCS,2))/60

120* PRINT:PRINT  “número del dato”

130* PRINT:PRINT “intervalo desde/hasta la bajamar más proxima”

140* PRINT “Correción aditiva”

150* A$=”"

160* WHILE A$=”":A$=INKEY$:WEND

170* IF A$<”1″ OR  A$>”2″ THEN 150

180* LOCATE 4 PRINT SPACES (80)

190* LOCATE 6 PRINT SPACES (80)

200* LOCATE 7 PRINT SPACES (80)

210* LOCATE  3, 1

220* ON VAL (A$) GOTO 230, 290

230* INPUT “Mismo intervalo formatoHH:MM”,IB$

240* IB=VAL (LEFT$(IB$,2)) + VAL(RIGHT$(IBS,2))/60

250* PRINT

260* PRINT “Correción aditiva”

270* PRINT USING “##.## metros”; am/2*(1-cos(IB*PI/DC))

280* END

290* INPUT “Correción aditiva”.COR

300* PRINT

310* C=1-2*COR/AM

320* IF C=0 THEN AT=PI/2:GOTO 370

330* T=SQR(1/C^2-1)

340* IF C<0 THEN AT=PI/2:GOTO 370

350* AT=ATN(T)

360* IF AT<0 THEN AT=PI+AT

370* IB=DC/PI*AT

380* HORA=INT(IB)

390* MINUTO=(IB-HORA)*60

400*  PRINT “intervalo hasta la bajamar más proxima”

410*  PRINT USING “## horas ##minutos”;HORA MINUTO

420* END

Bookmark and Share
© 2005-2010 (wmst_design) - Actualizado: 05/09/2010