Newsgroup: it.economia.borsa
Titolo: Exxon Mobil

Certo che la notizia Cheney non aiutera' i petroleum, visto che candela
profonda sul grafico exxon Mobil ?
Brutto affare per il Mib
JeffBeck

 Brutto affare per il Mib
si pesante comunque vorrei sottolineare che HallyBurton non č un petrolifero
ma un fornitore di servizi al settore petrolifero, al massimo problemi per
Saipem non per Eni almeno in teoria!

 Saipem non per Eni almeno in teoria!
Questo e' parlare da ottimista :DD
ciao
JeffBEck

 JeffBEck
il calo di Exxon e i problemi legali di HallyBurton non mi preoccupano, mi
preoccupa BP ( che prima era British Petroleum, poi cambiò nome in Beyond
Petroleum e adesso glielo cambio io in Bugiarda Puttana!) pare che abbia
fatto la furba e non abbia contabilizzato costi per 2-3 miliardi di dollari
di costi ambientali in Alaska! e pensa che sta merdaccia di titolo dopo
Chevron è quello che può vantare moltiplicatori più alti! e poi gli inglesi
hanno il coraggio di dire che i Gaap non van bene! e  che i criterei inglesi
sono i migliori (forse per truffare?) che guardino in casa loro hanno
copiato bene il sistema americano!

 copiato bene il sistema americano!
Non mi meraviglerei tanto fossi in te, gli americani non sono altro che
quelli sbarcati dalla mayflower qualche tempo fa :), piuttosto tu credi  che
un minimo impatto le parole del Bau Bush lo si avra' (o si sta gia'
avendo?),  bilanci un pochino piu' veritieri o meglio meno bugiardi?
JeffBeck

 avendo?),  bilanci un pochino piu' veritieri o meglio meno bugiardi?
No perchè se facesse sul serio dovrebbe dimettersi e incarcerarsi per 10
anni!

avendo?),  bilanci un pochino piu' veritieri o meglio meno bugiardi?
AHAHAHAHA, BELLA QUESTA, LA MIGLIORE DELLA SETTIMANA.. :-D
Ma non hai letto le dichiarazioni di O' Neill ?
Peggio che un falso in bilancio.. :-(((

 AHAHAHAHA, BELLA QUESTA, LA MIGLIORE DELLA SETTIMANA.. :-D
La prima o la seconda parte ?
While
.....
......
if prima=true then end
else gosub seconda
Wend
 .....
......
......
rem seconda
Seconda="AHAHAHAHAHAHAHAHAHAHAHAAHAHAHAHA"
For i= 1 to 1000000000000
Print  Seconda
next i
End
:DD
JeffBeck

La prima o la seconda parte ?
la seconda


CAZZO, ci avrei giurato.


 Togliere end
Non credo proprio.



ASsolutamente inutile
Se non ci sono altre istruzioni

 Se non ci sono altre istruzioni
E' proprio l'opposto, se vi sono altre istruzioni non lo metti l'END, finito
il ciclo for/next, ma e' la stessa cosa per un while/wend, ecc., il flusso
esegue l'istruzione seguente. Questo e' valido per tanti linguaggi, basic,
cobol, Visual ecc. Quello che segue e' un esempio in Fortran, anzi due.
Calcola la radice quadrata di un numero con test sul segno
   IMPLICIT NONE
   REAL :: radicando
!
   WRITE(*,*) " Inserisci un valore: "
   READ(*,*)  radicando
   IF (radicando>=0.0) THEN
      WRITE(*,*) " La sua radice quadrata vale: "
      WRITE(*,*) SQRT(radicando)
   ELSE
      WRITE(*,*) " Errore: inserito valore negativo! "
   END IF
   END
****
IMPLICIT NONE
  REAL :: a, b, c, d  ! coefficienti dell'equazione e discriminante
  COMPLEX :: x1, x2   ! radici complesse dell'equazione
! lettura dei coefficienti
  PRINT*, "Coefficiente a: "
  READ(*,*) a
  PRINT*, "Coefficiente b: "
  READ(*,*) b
  PRINT*, "Coefficiente c: "
  READ(*,*) c
! calcolo del discriminante
  d = b**2-4.*a*c
  IF (d > 0.) THEN
     PRINT*, "Radici reali e distinte"
     x1 = (-b-SQRT(d))/(2.*a)
     x2 = (-b+SQRT(d))/(2.*a)
  ELSE IF (d == 0.) THEN
     PRINT*, "Radici reali e coincidenti"
     x1 = -b/(2.*a)
     x2 = x1
  ELSE
     PRINT*, "Radici complesse coniugate"
     x1 = CMPLX(-b,-SQRT(-d))/(2.*a)
     x2 = CONJG(x1)
  END IF
  WRITE(*,*) x1, x2
  END
FINE
JeffBeck

cobol, Visual ecc. Quello che segue e' un esempio in Fortran, anzi due.
Ehmm... Qualcosina in Turbo basic l'ho scritta (qualche decina di migliaia di righe)
E ti garantisco che l'istruzione END, posta alla fine di un programma, non serve a nulla
Print "scritta"
E basta
Il programma scrive "scritta" e termina
Se è un EXE torna al DOS o al S.O. da cui l'hai lanciato o al compilatore se 
stai eseguendo il listato
Prova