Pascal (linguaggio)

Da Wikipedia, l'enciclopedia libera.
Vai a: navigazione, cerca
Pascal
Easypascal.jpg
schermata del compilatore EasyPascal
Autore Niklaus Wirth
Data di origine 1970
Utilizzo generico, didattico
Paradigmi programmazione strutturata
Tipizzazione forte, statica
Specifiche di linguaggio Pascal user manual and Report
Estensioni comuni .pas, .inc
Influenzato da ALGOL

In informatica, il Pascal è un linguaggio di programmazione creato da Niklaus Wirth.

Il Pascal si basa sul linguaggio ALGOL e fu così chiamato in onore del matematico e filosofo francese Blaise Pascal, inventore della prima macchina calcolatrice automatica.

Indice

[modifica] Storia

Wirth era un docente di programmazione e sentiva la mancanza di un vero linguaggio di programmazione adatto alla didattica e che fosse dotato di strutture dati avanzate. Il BASIC, creato nel 1964, era facile da imparare ma non aveva strutture dati avanzate e soprattutto non incoraggiava affatto ad analizzare il problema da risolvere prima di scrivere il codice. Perciò, Wirth creò da zero il Pascal, inserendo nel linguaggio il concetto di programmazione strutturata.

La prima implementazione del linguaggio divenne operativa nel 1970, ma raggiunse una discreta diffusione nel campo industriale nel 1973 con la pubblicazione del testo: "Pascal user manual and Report". Questo è il testo di riferimento standard per il linguaggio.

TeX e buona parte delle prime versioni del sistema operativo del Macintosh e di Microsoft Windows furono scritte in Pascal.

Essendo un linguaggio pensato per degli utenti inesperti, spesso i compilatori Pascal hanno un atteggiamento materno nei confronti del programmatore, partendo dal presupposto che qualunque irregolarità del codice scritto sia un errore, che infastidisce un po' gli esperti. In cambio è un linguaggio completo e potente, e soprattutto educa fin dall'inizio ad adottare un buono stile di programmazione e ad analizzare a fondo il problema prima di cominciare a scrivere il codice, cosa che rende i programmi Pascal più chiari e più facili da leggere.

Data la diffusione negli ambienti scolastici, ne sono state create versioni ad oggetti, come il Turbo Pascal e l'Object Pascal (utilizzato nell'ambiente di sviluppo Delphi di Borland).

[modifica] Caratteristiche

Le caratteristiche principali del Pascal sono una sintassi molto chiara e molto rigida, l'obbligo di dividere il programma in sezioni ben definite (uses, declaration, implementation) e di dichiarare in anticipo tutte le variabili usate nel programma; permette l'uso di tipi di dati complessi e definibili dal programmatore (i record); permette (con alcune limitazioni) l'uso dei puntatori e l'allocazione dinamica della memoria (new e dispose). Il Pascal è pertanto classificato come linguaggio semidinamico, in quanto gestisce i puntatori, permettendo di creare liste di variabili di dimensione non nota all'atto della compilazione, ma questi possono essere solo di un tipo alla volta, il tipo usato per definire la variabile puntatore stessa. Al posto delle subroutine di uso comune nei linguaggi di allora, il Pascal introduce le procedure e le funzioni, che estendono il concetto di subroutine incapsulando al loro interno le variabili e i dati locali, ed esponendo solo i valori in ingresso ed in uscita. Inoltre, nella sua formulazione originale, era privo dell'istruzione GOTO, aggiunta poi in seguito con riluttanza.

[modifica] IDE gratuiti

[modifica] Programmi di esempio

[modifica] Hello, world!

Il seguente esempio stampa il testo "Hello world".

program hello;
uses crt;
begin
  writeln('Hello World');
  readln;
end.

Note La prima riga introduce il programma con la parola chiave program, a cui segue il titolo del programma. Non possono essere utilizzati caratteri speciali né spazi. La quinta riga contiene l'istruzione writeln, usata per scrivere a video il testo ("Hello World") riportato tra parentesi, mentre la sesta, con l'istruzione readln, pone il programma in attesa di un input da tastiera, in modo da non far scomparire immediatamente la scritta. Quando verrà premuto un tasto qualsiasi, il programma procederà eseguendo l'istruzione end, che pone fine alla sequenza. Tale comando è l'unico, in ambiente Pascal, ad essere seguito da un punto anziché da un punto e virgola.


[modifica] Variabili

Il Pascal mette a disposizione molti tipi di variabili:

  • Tipi interi, utilizzati per memorizzare valori numerici interi, con o senza segno. In Pascal sono:
    • integer: variabile di tipo intero a 16 bit con segno (numeri da -32768 a 32767)
    • word: variabile di tipo intero a 16 bit senza segno, copre i valori da 0 a 65535.
    • byte: come già suggerisce il nome, questo tipo occupa 1 byte in memoria e consente 28 = 256 differenti valori, nel dettaglio da 0 a 255. Questo tipo è completamente compatibile con il tipo char, l'unica differenza consiste nel fatto che un tipo byte ha come visualizzazione predefinita quella di un numero, mentre il char quella di un carattere.
    • short: come il precedente occupa un solo byte ma i valori possono variare da -128 a 127.
    • longint: occupa 4 byte (e quindi 4x8=32 bit) e permette quindi di gestire 232 = 4294967296 diversi valori, compresi fra -2147483648 e 2147483647.
    • comp: è il tipo intero più grande. Occupa 8 byte (64 bit), pertanto permette di gestire 264 = 18446744073709551616 diversi valori, compresi tra -9.2E18 e 9.2E18.


  • Tipi reali:
    • real: numero reale (numeri da -2.9E-39 a 1.7E38), se nel stampare a video risultati reali ottenete numeri incomprensibili è perché essi sono scritti notazione scientifica o esponenziale. Se si inseriscono da tastiera numeri real, bisogna scriverli in notazione esponenziale. Per ovviare a questo problema durante l'output sullo schermo utilizzare la seguente sintassi:
... {Altre istruzioni}
Var R:Real;
... {Altre istruzioni}
Writeln('Il numero reale è ',R:10:3);
... {Altre istruzioni}

In questo caso vengono visualizzate in tutto 10 cifre, di cui 3 decimali, mentre le restanti 6 sono intere (il punto separatore viene conteggiato come cifra intera!).

  • Tipo carattere (char): variabile carattere, contiene 1 solo carattere.
  • Tipo booleano (boolean): variabile binaria (falso vero, false true).
  • Tipi strutturati:
    • string: stringa di caratteri, utilizzata per l'input di più caratteri, come un testo.

[modifica] Input e output

L'input di dati da tastiera, viene effettuato tramite l'utilizzo del comando readln(nome_variabile).
L'output invece usa il comando writeln(nome_variabile); la stampa a video usa lo stesso il comando writeln, però il testo è tra apici ' ' (writeln('ciao mondo');)
I/O di interi:

program input_output(input, output);
var 
     n1,n2,ris:integer;               {Dichiarazione tipo intero}
begin
     writeln('Inserisci n1');         {viene visualizzato il testo tra ' '}
     readln(n1);                      {comando di input, la variabile introdotta viene inserita in n1}
     writeln('Inserisci n2');
     readln(n2);
     ris:=n1+n2;                      {fa la somma di n1 e n2 e il risultato viene inserito in ris}
     writeln('La somma e'' uguale a ',ris);     {stampa il messaggio tra ' ' e la variabile ris}
     readln;     {evita che il programma si chiuda senza che sia possibile leggere l'ultima riga}
end.

I/O reali: per l'input di numeri reali il metodo resta sempre lo stesso (readln (variabile)),
invece per l'output, per vedere numeri comprensibili bisogna usare una sintassi diversa nel writeln

 
program input_output(input, output);
var   n1,n2,ris:real;                  {Dichiarazione tipo reale}
begin
     writeln('Inserisci n1');         {viene visualizzato il testo tra ' '}
     readln(n1);                      {comando di input, la variabile introdotta viene messa in n1}
     writeln('Inserisci n2');
     readln(n2);
     ris:=n1+n2;                      {fa la somma di n1 e n2 e il risultato viene messo in ris}
     writeln('La somma e'' uguale a ',ris:6:2);  
{stampa il messaggio tra ' ' e la variabile ris, con 3 numeri prima della "," , la "," stessa e 2 dopo}
     readln;
end.

Nella stampa a video abbiamo usata una 'modifica' del comando writeln: la modifica sta nell'aggiungere var:n:m dove var è il nome
della variabile da visualizzare, n è il numero di cifre complessive (compresa la ",") da visualizzare e m sono quelle dopo la virgola.
Se ci sono più cifre da visualizzare di quelle indicate, esse non vengono fatte vedere.(formattazione dell'output)

I/O caratteri: l'input e l'output di caratteri (numeri, lettere, simboli), è molto semplice da effettuare, per il semplice motivo che è lo stesso metodo di i/o dei numeri interi

program input_output(input, output);
var   ch:char;               {Dichiarazione tipo carattere}
begin
     writeln('Inserisci il carattere');         {viene visualizzato il testo tra ' '}
     readln(ch);                      {comando di input, la variabile introdotta viene messa in ch}
     writeln('Il carattere inserito e'' ',ch);     {stampa il messaggio tra ' ' e la variabile ch}
     readln;
end.

I/O stringhe: le variabili stringhe in effetti non sono altro che array di char (vettori di caratteri). Questo esempio è veramente semplice in confronto alle potenzialità del Pascal, difatti con questo linguaggio si possono creare vere e proprie applicazioni.

[modifica] Strutture di controllo

[modifica] Alternative

Program alternativa;
var 
   n:integer;
begin
 write('inserisci un numero: ');
 readln(n);
 if n > 0     {controlla se il valore è positivo}
  then
    write('il numero è positivo.')
  else
    write('il numero è negativo.');
 readln;
end.

[modifica] Iterazione

I seguenti pezzi di programmi sono un esempio dei cicli di Pascal.

Program ciclo_for;
var i, n, num:integer;
begin
 write('quanti numeri vuoi inserire?');
 readln(n);
 for i:=1 to n do
  begin
   write('inserisci il numero: ');
   readln(num);
  end;
 readln;
end.

program ciclo_until;
var i,n,num:integer;
begin
 i:=0;
 write('quanti numeri vuoi inserire: ');
 readln(n);
 repeat
  write('inserisci un numero: ');
  readln(num);
  i:=i+1;
 until i=n-1;
readln;
end.

program ciclo_while;
var i,n,num:integer;
begin
 i:=0;
 write('quanti numeri vuoi inserire: ');
 readln(n);
 while i<n do
  begin
   write('inserisci un numero: ');
   readln(num);
   i:=i+1;
  end;
readln;
end.

[modifica] Voci correlate

[modifica] Note

  1. ^ Free Pascal - Advanced open source Pascal compiler for Pascal and Object Pascal - Home Page
  2. ^ Lazarus Project :: Write once compile everywhere!
  3. ^ Bloodshed Software - Providing Free Software to the internet community

[modifica] Altri progetti

[modifica] Collegamenti esterni

informatica Portale Informatica: accedi alle voci di Wikipedia che trattano di informatica
Estratto da "http://it.wikipedia.org/w/index.php?title=Pascal_(linguaggio)&oldid=45870018"
Strumenti personali
Namespace
Varianti
Azioni
Navigazione
Comunità
Stampa/esporta
Strumenti
Altre lingue