Atribuire. Citire. Scriere.

Atribuire. Citire. Scriere.

Atribuirea

Instructiunea de atribuire are forma

v:=expresie;

iar principiul de executare este urmatorul: se evalueaza expresia din partea dreapta a operatorului de atribuire := iar apoi variabila v ia valoarea obtinuta.

Regula fundamentala este: tipul expresiei trebuie sa coincida cu tipul variabilei v sau tipurile lor sa fie compatibile.

Exemplu :

program atribuire;

var i,j:integer;

r:real;

l:boolean;

begin

i:=15;

j:=(9+i*2) div 4;

r:=6*(i+j)/(4+i*i);

l:=true;

l:=i<15;

i:=j+l;

end.

Citirea

Instructiunile de citire sunt urmatoarele:

read(v1,[v2,v3, . ,vn])

sau

readln[(v1,v2, . ,vn)]

unde v1 la vn sunt identificatori de variabile.

Datele introduse de la tastatura se transfera in zona tampon dupa apasarea tastei ENTER si se asociaza variabilelor din lista. Datele numerice trebuie separate prin spatii, TAB sau sfarsit de linie. Cele doua instructiuni de mai sus functioneaza asemanator. Readln efectueaza in plus un salt la linie noua dupa citire, variabilele din zona tampon ramase neasociate vor fi neglijate.

Exemplu

program citire;

uses crt;

var x1,x2:integer;

c1,c2:char;

y,z:real;

BEGIN

clrscr;

readln(x1,c1,c2,x2);

read(y,z);

END.

Daca se introduce de la tastatura sirul 1 23, la apasarea tastei ENTER, x1 ia valoarea 1, c1 primeste caracterul "spatiu", c2 caracterul "2", iar x2 valoarea Apoi calculatorul asteapta valori pentru y si z.

Daca se introduce de la tastatura sirul 1 23 2.5 6.89, la apasarea tastei ENTER, x1 ia valoarea 1, c1 primeste caracterul "spatiu", c2 caracterul "2", iar x2 valoarea Valorile reale 2.5 si respectiv 6.89 se pierd. Pentru ca acestea sa fie atribuite lui y respective z, este necesar ca de la tastatura sa se introduca

1 23 <ENTER>

2.5 6.89 <ENTER>

Scriere

Instructiunile de scriere sunt urmatoarele:

write(v1,[v2,v3, . ,vn])

sau

writeln[(v1,v2, . ,vn)]

unde v1 la vn sunt identificatori de variabile.

Afisarea datelor este implicit intr-un format de lungime maxima, numit "stiintific" sau exponential.A pelul urmator

writeln(a);

pentru a=5.78 va avea ca rezultat afisarea :

5.77999999999884E+0000

ceea ce , matematic reprezinta : 5,77999999999884 * 10 s,dificil de citit la prima vedere.

Alternativa explicita este afisarea cu format, in primul rand pentru datele de tip numeric, dar

nu numai. Astfel, vom scrie pentru:

- tipul intreg, caracter, sir de caractere, logic (boolean) :

writeln(identificator:lungime_de_afisare);

exemplu:

a:=10; writeln(a:4);

Rezultat :blancblanc10 (lungimea de afisare este 4, aliniere la dreapta)

tipul real:

writeln(identificator:lungime_de_afisare_totala :lungime_parte_zecimala)

exemplu :

a:=9.8 ; writeln(a:4:2);

Rezultat :9.80 (lungimea de afisare este 4, din care doua cifre zecimale)

Observatii:

Procedurile standard de citire si scriere pot fi apelate fara argumente :

Readln;

Writeln;

Datele de tip enumerat nu pot fi citite si afisate, deci nu constituie argumente ale procedurilor standard de citire sau scriere.

Datele de tip logic(boolean) nu se pot citi, deci nu sunt apelate de procedurile standard de citire.