[guida] TURBO PASCAL

FONTI:GUIDA BY $TEP MA MODIFICATA DA C.N.69 E ME(HACKER..90)


Premessa:il turbo pascal è un linguaggio utilizzato soprattuto nel campo della matematica e infatti è molto spesso è studiando nelle scuole dei programmatori ed è un linguaggio a mio avviso abbastanza noioso...tuttavia come ho gia detto può risultare molto utile per i programmai e le applicazioni matematiche....
Dunque cominciamo: beccatevi la versione 7.0 o la X (ke personalmente ritengo la migliore) e destreggiatevi col mouse (già: il mouse!) sul semplice menu e sull'intuitiva schermata. Potete aprire dei listati già esistenti oppure crearne di nuovi... già ma che scrivere? Ordunque vediamo, prendiamo un programma semplicissimo in Pascal che printa "Hack U !"




Vediamo: allora le virgolette si mettono alla fine di ogni riga tranne dopo il BEGIN, l'ultimo END (punto) e un paio di altri casi che vedremo in seguito.

Se al posto di HACK U voleste scrivere " L'astro d'argento " avreste la brutta sorpresa che per scrivere gli apostrofi bisogna pigiarli due volte. Perciò verrà: L''astro d''argento.

"Writeln" è un comando per scrivere le cose a capo. Per scrivere sulla stessa riga si usa solo "write".

Andiamo avanti with anotha prog (mi sto gasando con l'americano).




Nella parte dichiarativa abbiamo comunicato all' elaboratore che n è una variabile (VAR) che nel corso dell' esecuzione potrà avere soltanto un valore INTEGER , cioè di numero intero positivo o negativo.

Esaminando successivamente il listato vedremo che la parte esecutiva è introdotta da BEGIN ( = inizio).

Poi troviamo una nuova parola riservata, READLN ( abbreviazione Read Line = leggi riga).Essa serve a leggere i dati di input.

La sua sintassi è molto semplice :




Inoltre l' istruzione READLN non seguito da alcun parametro, crea un ciclo di attesa che dura finchè non viene premuto Invio.

E' d' obbligo alla fine di un listato, prima dell' END, poichè "congela" lo schermo quando dobbiamo leggere il risultato dell' elaborazione.

Ad esempio, se eseguissimo il programma precedente senza READLN finale, non potremmo esaminare i risultati della nostra operazione, perchè il programma si arresterebbe troppo in fretta.

Infine, alla fine del programma (scusate il gioco di parole), troviamo END seguito da un punto. Esso indica la fine del flusso delle informazioni e il conseguente arresto del programma.



Tipi di Dati



Oooohhhh...... Come già visto in precedenza, nel settore dichiarativo di un programma bisogna definire il tipo di variabili che intendiamo utilizzare nel corso del programma stesso.

Esistono vari tipi di variabili, e sono raggruppate in questo breve specchietto.

| INTEGER | -32768 / +32767 | numeri interi positivi e negativi |

| BYTE | 0 /255 | numeri interi |

| WORD | 0 / 65535 | numeri interi |

| REAL | 2.9x10^-36 / 1.5 x 10^35 | (Numeri reali positivi e negativi) |

Questo schema dimostra come ci siano vari tipi di dichiarazione dei dati.

Non è detto, però, che i tipi di dati corrispondano soltanto a cifre; potremmo infatti di fronte a un problema che necessita di dati alfanumerici, cioè di numeri e lettere.

In questo caso dovremmo introdurre due nuovi tipi di variabile:

1) STRING[x] : Dichiarando così un tipo di dato assumeremo che quel dato è formato da un numero intero di x caratteri alfanumerici (compresi gli spazi). Usato senza parametri non definisce la lunghezza della stringa. Inoltre nel caso in cui si dichiari una lunghezza minore del dato inserito, l' elaboratore non considererà i cartteri che eccedono.

Ad esempio, se dichiarassimo la variabile a di tipo STRING[5] e al momento di inserire i dati digitassimo la parola "folletto" , essa risulterebbe troncata in "folle", poichè i caratteri in eccesso non verrebbero considerati nell' elaborazione.

2) CHAR : E' meno usata di STRING, ma qualche volta può risultare utile. Viene usata per definire variabili da un solo carattere ( eccetto numeri).



Strutture Ripetitive



Ora le cose si fanno un attimo + complesse. Il termine iterare deriva dal latino e significa "ripetere"... Ma tanto il latino allo scientifico manco c'è più... Altro che ai miei tempi...

Questa struttura (che è presente in tutti i linguaggi programmativi, non solo in Pascal) agisce su una operazione che deve essere ripetuta più volte. Ne esistono vari tipi:

A) Iterazione enumerativa - Come dice la parola stessa esegue un'operazione n volte.In Pascal è indicata dal comando:




Nel nostro caso ni sostituisce il numero intero dal quale si parte a enumerare e nf sostituisce il numero fino al quale si continua a enumerare. Dopo questa istruzione di iterazione si inseriscono le istruzioni da ripetere racchiudendo il tutto con un END seguito da un punto e virgola (, poichè il flusso di informazioni non è del tutto terminato.

E' possibiile anche procedere a ritroso, contando alla rovescia da un numero n fino ad arrivare ad un numero t:


Ecco un semplice esempio:




B) Iterazione per falso - Esegue il ciclo racchiuso tra REPEAT e UNTIL se, e solo se, la condizione espressa da UNTIL è vera, in caso contrario continua a ripetere le istruzioni.




Ricordarsi di inserire proposizioni possibili dopo UNTIL altrimenti l'uscita dal ciclo ripetitivo non si avrà mai. Per uscire da un programma-trappola di questo tipo, nel Pascal la combinazione ALT+F4 nn sempre funziona, xciò potete shuttare down il programma pigiando il tasto "Windows", quello con la finestrella x intenderci. Con Linux nn ne ho idea.

Esempio:




C) Iterazione per vero - Esegue le informazioni racchiuse tra WHILE DO e l' END;( il punto e virgola indica che l' END è parziale ) finché la condizione presa in esame non sia falsa.




Questo semplice esempio spiega come il blocco di istruzioni presente tra WHILE DO e END; venga ripetuto finché si rispetti la condizione a=3.

Nel caso in cui il valore di a fosse stato diverso da 3, infatti, il blocco di istruzioni non sarebbe stato mai eseguito.

Ma è possibile operare delle scelte con il TP ?? Certo!

Esistono due tipi di selezione: la selezione binaria e la selezione multipla.

a) Selezione binaria - E' la più semplice: se consideriamo un numero naturale qualsiasi e ci domandiamo se esso è pari, la risposta potrà avere solo due alternative: Si oppure No. In Tp c'è la possibilità di eseguire una scelta binaria tra due condizioni con il seguente comando:




Questo è quanto serve per operare ( o far operare al computer ) una scelta. Per chiarire ulteriormente questo importante processo vedrò di presentarvi un esempio. Costruiamo un programma che calcoli l' area di un rettangolo SE E SOLO SE l' area stessa è minore di un numero n ( per esempio 20) e maggiore di un numero m (per esempio 10);




E' un listato semplice, e l' unica osservazione da fare è che se dopo IF...THEN c'è solo un istruzione può essere scritta terminando il tutto con il solito punto e virgola(. Tuttavia , se ce ne sono più di una è necessario aprire un altro BEGIN e cominciare un sottoprogramma il quale, però va terminato con l' END; che, se seguito da ELSE non accetta il punto e virgola(.

b) Selezione multipla - Se domandiamo ad una persona quali sono i piatti che preferisce essa sceglierà fra un' ampia gamma di pietanze fino a scegliere quella che soddisfi i suoi gusti. infatti, al contrario di prima,la selezione multipla ci fornisce illimitate possibilità di risposta.

Il comando che in TP ci permette di operare un selezione multipla è il seguente:




Nonostante la sua sintassi spaventosamente ricca, questa struttura è di facilissima comprensione. Innanzitutto dobbiamo decidere se dichiarare la variabile n come tipo INTEGER oppure CHAR. Se n è CHAR dovremo usare UNA lettera seguita dai due punti( e dal rispettivo sottoprogramma delimitato da BEGIN e END; . Se invece n è INTEGER dovremo usare un numero naturale al posto di n e mettere dopo i due punti( il solito sottoprogramma delimitato da BEGIN e END; . Proviamo ora con un' esempio: un programma che generi un numero a caso tra 1 e 10 e lo comunichi all' operatore solo se esso è uguale a 7, 9 o 3.




Potrebbe sembrare che quelle poche strutture analizzate debbano esssere affiancate da molte altre per costruire un programma relativamente complesso, ma le strutture sequenziali sono le più lineari, poichè il flusso di dati scorre senza ripetizioni né selezioni che abbiamo utilizzato tranquillamente nel primo programma ( quello del triplo di un numero ) senza saperlo.



Procedure



Spesso, soprattutto in programmi complessi e piuttosto elaborati, ci troviamo dinanzi al problema di ripetere uno stesso procedimento più volte all'interno dello stesso programma. La soluzione a questo problema è data dal fatto che possiamo memorizzare una procedura e ripeterla a piacimento durante la stesura del programma.

Questa utilissima funzione ha la seguente sintassi:


E' importante dire che i precedenti comandi devono essere digitati tra il settore dichiarativo e il corpo del programma (per intenderci, prima del BEGIN iniziale).



Per richiamare una procedura durante il programma bisogna digitare il nome

della procedura seguito da un punto e virgola(.

Esempio: Modificare il programma precedente inserendo una procedura.

[CODE
CODICe
PROGRAM numeri_casuali;
USES crt;
VAR a,b,c:INTEGER;
PROCEDURE output; ( * Qualsiasi nome va bene * )
BEGIN
WRITELN(' Il numero estratto è ',c);
READLN;
END;
BEGIN
CLRSCR;
RANDOMIZE;
c:=RANDOM(10); ( * Questo comando permette all' elaboratore di generare un
numero a caso compreso tra 0 e il numero indicato in
parentesi. Il massimo consentito è 255 * )
CASE c OF
7:BEGIN
output;
END;
9:BEGIN
output;
END;
3:BEGIN
output;
END;
ELSE
BEGIN
WRITELN(' Il numero uscito è diverso da 3 7 e 9);
END;
END;
[/CODE]

In questo caso una procedura è addirittura una perdita di tempo poichè le istruzioni da riscrivere sono poche ma in casi più complessi fanno risparmiare tempo e fatica. E voi non dovete avere tempo da perdere!



VARIE



Qua ho riportato alcuni comandi che servono per gasarsi un po'.

1) TEXTCOLOR(n)= Colora il testo che segue di un colore definito da n che è un numero da 0 a 15. I numeri maggiori di quindici producono un effetto lampeggiante.

2) TEXTBACKGROUND(n)= Colora lo sfondo d un colore definito da n. Sintassi simile a TEXTCOLOR.

3) ABS(x) = Calcola il valore assoluto del numero x;

4) SQRT(x) = Calcola la radice quadrata di x;

5) DELAY(n) = Crea un ciclo di attesa lungo n ( millisecondi)


I segni di operazione in TP , sono i seguenti:

'+' = ADDIZIONE

'-' = SOTTRAZIONE

'*' = MOLTIPLICAZIONE

'/' = DIVISIONE

MOD = RESTO DELLA DIVISIONE ( MOD può essere usato soltanto se i numeri da

dividere sono di tipo INTEGER )


Inoltre, per indicare il rapporto fra due cifre ci serviamo dei seguenti simboli matematici :

'<' = MINORE

'>' = MAGGIORE

'=' = UGUALE

'=>'= MAGGIORE O UGUALE

'<='= MINORE O UGUALE

'<>' = DIVERSO DA ...



Guida by $tep --> edit by C.N.69

ooooooooooooooooooooooooo

w il prof la neve ^^

Hacker..90 sei abbastanza bravo in Turbo Pascal?xkè nio lo facciamo a scuola e ci sarà un compito....me lo puoi fare tu qst problema???
L'azienda che gestisce l'acquedotto di una città rileva le letture dei contatori ogni 6 mesi. Le bollette vengono così fatturate:
25 euro per consumo minore/uguale a 50 metri cubi al semestre
0.55 euro al metro cubo per consumi che superano i 50 metri cubi
sugli importi viene applicata l'iva del 20%.Compila l'algoritmo dell'importo da pagare.

Mi dispiace ma nn so aiutarti....io del turbo pascal conosco solo le basi....Come linguaggio di programmazione nn mi piace per niente e quidi nn lo mai studiato bene perchè a mio avviso nn serve a nulla tranne che a punto fare operazioni matematiche che a menn interessano......

mi disp
Buona fortuna per il compito.....

a parte ke non c'è nessun compito in programmazione e ke la scuola è finita, quell'esercizio è vecchio !!!!!