Benvenuti in EnPlateia! Dopo aver navigato nel tempestoso e misterioso mare di Internet , scosso da onde-link alte tre metri e da venti a forza 7 della famossisima scala Web (Wento Extremamente Bruto), dopo aver rischiato di naufragare a causa di innumerevoli sirene (e che sirene!), sei finalmente giunto in un porto sicuro! Qui potrai trovare ristoro per la tua sete di musica o di conoscenza o per la tua fame di programmi & tanto altro ancora! EnPlateia, un sito da... leccarsi i baffi!
Home Nostri Programmi Programmi Manuali Crackz Mp3 Giochi Buonumore Links Ricerca Shout! E-m@il
  IF
If � molto usato nella gestione delle possibilit�. L'uso corretto �:

IF A<0 THEN ... se a � minore di 0 allora...
IF A=0 ... se A � uguale a 0 allora...
IF A>0 ... se A � maggiore di 0 allora...
IF A<=0 ... se A � minore uguale di 0 allora...
IF A>=0 ... se A � maggiore uguale di 0 allora...
IF A<>0 ... se A � diverso da 0 allora...

Ovviamente A deve essere una variabile inizializzata e deve contenere dei valori. Notate tra le altre cose che c'� A=0 e non A:=0. Perch�? Perch� nel secondo caso si obbligherebbe A ad assumere il valore di 0 e non lo si confonterebbe con esso come invece � utile fare.
In pi� l'IF si pu� utilizzare anche cos�:

IF A<0 THEN BEGIN
...
OPERAZIONI
...
END;

Si possono quindi aprire cicli di operazioni da fare nel caso in cui la condizione posta con if si verifichi. Esiste collegato ad IF il comando ELSE che vuol dire "altrimenti".

IF A<0 THEN...(quando A quindi vale -1, -2, -56, -3445, ecc.)
operazioni
ELSE... (quando A vale 2,65,3556,...)
operazioni

Esempio pratico:

PROGRAM MAGGIORE_O_NO;
VAR A,B:INTEGER;
BEGIN
WRITELN('Scrivi due numeri separati da uno spazio: ');
READLN(A,B);
IF A>B THEN WRITELN ('IL NUMERO ',A,' E'' MAGGIORE DI ',B)
ELSE WRITELN('IL NUMERO ',A,' E'' MINORE DI ',B);
END.

Cosa fa questo programma? Chiede 2 numeri, li confronta e valuta quale dei due � maggiore rispetto all'altro. Da notare che non c'� ";" dopo la riga con l'IF, perch�, se ci fosse stato, ELSE non avrebbe funzionato.
E quindi: 

IF A>0 THEN 
BEGIN
...operazioni...
END
ELSE
...operazioni...

Notate che dopo END non c'� ";", per lo stesso motivo di prima.

Lezione precedente | Inizio | Prossima lezione 

ACCESSO RAPIDO!
Virus, trojan...
Per conoscere virus, trojan e backdoor e difendersi da essi

BerluscaBerlusca
Alcuni manifesti truccati del Grande Biscione

Traduzioni!Traduzioni
Difficoltà con i testi greci o latini? Ecco le traduzioni!

Webmaster: Xagim ([email protected])
Questo sito non è a scopo di lucro, nè vuole violare i diritti di copyright. Tutto il materiale contenuto in EnPlateia è disponibile gratuitamente su Internet. Noi lo abbiamo solo raccolto, classificato e rimesso sulla Rete, a disposizione di altri utenti...

Hosted by www.Geocities.ws

1