Come scritto prima, in Pascal esistono dei tipi di variabili che possono contenere dati anche diversi dai numeri. Queste variabili sono : char, string, boolean. In questo articolo parleremo dei primi due tipi.

Variabili char

Le variabili char possono contenere un carattere alfanumerico (lettere, cifre, simboli). Se dovete assegnare a una variabile di tipo char un valore dovrete farlo tra apici come segue:

x:='g';

Si possono utilizzare due funzioni con le variabili char : ord e chr. La funzione ord dà il numero corrispondente al codice ASCII del carattere contenuto nella variabile . Per usare la funzione ord serve un tipo di variabile in grado di immagazzinare dati numerici, fa quindi al caso nostro il tipo integer.

Esempio

program ascii;
var x:char;
z:integer;
begin
writeln ('Digita un carattere, ne ricaverò il numero in codice ASCII corrispondente.');
read (x);
z:= ord (x);
writeln (z);
readln;
end.

La funzione chr è essenzialmente il contrario di ord. Infatti da una variabile numerica, chr ricava il simbolo corrisondente nel codice ASCII, quindi il risultato deve essere contenuto in una variabile char.

Esempio

program ascii2;
var x: char;
z:integer;
begin
writeln ('Digita un numero, ne ricaverò il carattere ASCII corrispondente.');
read (z);
x:= chr (z);
writeln (x);
readln;
end.

Variabili string

Le variabili string possono contenere più caratteri alla volta ma questo dipende dal numero massimo di caratteri che decidete di far acquisire alla variabile nel modo seguente:

var parola :string[8];

Potete dare lunghezze massime diverse secondo le vostre esigenze ma devono essere comprese tra 1 e 255. Per assegnare a una variabile string un valore dovrete farlo tra apici come le variabili char:

Esempio

x:='Il mio indirizzo è ';

Per le variabili string c'è la funzione length, che dà all' utente la lunghezza della stringa. E' inoltre possibile sommare due o più variabili string, come se fossero delle variabili numeriche.

Esempio

program uso_string;
var parola1,parola2:string [12];
l1,l2:integer;
begin
parola1:= 'Capo';
parola2:= 'stazione';
l1:= length (parola1);
l2:= length (parola2);
writeln (parola1+parola2,' ha ',l1+l2,' lettere.');
readln;
end.

TrackBack URI for this entry