Pascal este unul dintrelimbajele de programare de referință în științacalculatoarelor. Pascal a fost dezvoltat de elvețianulNiklaus Wirth în 1970 pentru a pune în practicăprogramarea structurată, aceasta fiind mai ușor decompilat. Unul dintre marile sale avantaje este asemănarea cu limbajul naturallimba engleză, ceea ce îl face limbajul ideal pentru cei care sunt la primul contact cu programarea. Pascal este bazat pe limbajul Algol și a fost denumit astfel în onoarea matematicianului Blaise Pascal, creditat pentru construirea primelor mașini de calcul numeric. Wirth a mai dezvoltat limbajele Modula-2 și Oberon, similare cu Pascal.
Cele mai populare implementări a acestui limbaj au fost Turbo Pascal și Borland Pascal, ambele ale firmei Borland cu versiuni pentruMacintosh șiDOS, care i-au adăugat limbajului obiecte și au fost continuate cu versiuni destinate programării vizuale pentruMicrosoft Windows (utilizate de mediul de dezvoltareDelphi) și pentruLinux (Kylix).
În prezent există și alte implementări mai mult sau mai puțin populare, dar gratuite, printre care se remarcăFree Pascal șiGNU Pascal.
Deși în prezent este relativ rar folosit în industriasoftware, el este încă util elevilor și studenților care doresc să se inițieze în programare. Spre deosebire deBASIC, care a stat în trecut la baza învățării programării, Pascal este un limbaj structurat. De aceea, el formează un anumit tip de gândire, similar limbajelor moderne, precumC++, dar nu deține complexitatea și abstractizarea acestuia din urmă, fiind mai ușor de înțeles datorită sintaxei simple și apropiate depseudocod.
- String (șiruri de caractere)
( ) | grupează expresiile |
+,- | adunare și scădere |
*,/ | înmulțire și împărțire (împărțirea cu virgulă se face în numere reale) |
mod | returnează restul (doar în întregi) |
div | returnează câtul (doar în întregi) |
< | mai mic |
> | mai mare |
= | egal |
<> | diferit |
<= | mai mic sau egal |
>= | mai mare sau egal |
+ | concatenarea a două șiruri |
<,> | mai mare sau mai mic, pe baza ordiniilexicografice în funcție de codurileASCII |
= | cele două șiruri sunt identice |
begin <instrucțiuni> end.
if <condiție> then <instrucțiune>;
sau
if <condiție> then <instrucțiune> else <instrucțiune>;
while <condiție> do <instrucțiune>
repeat <instrucțiuni> until <condiție>
for <variabilă>:=<valoare_inițială> to <valoare_finală> do <instrucțiune>
sau
for <variabilă>:=<valoare_inițială> downto <valoare_finală> do <instrucțiune>;
program <nume_program>;uses <biblioteci cu funcții și proceduri folosite în program>type <tipuri de date definite de utilizator>const <constante folosite în program>var <variabile globale folosite în program><aici se pot scrie funcții și proceduri folosite în program>begin <aici se scrie programul principal>end.
- Notă: După fiecare comandă se pune "; " cu următoarele excepții: înainte de "else" (pentru testul if <conditie> then <instrucțiune_1> <"else"> <instrucțiune_2> , după "do" sau "then" pentru repetitive respectiv testul "if" ,care, în structura lor nu au decât o singură instrucțiune ; înainte de "begin" (dacă există) al oricărei repetitive (for <condiție> do , while <condiție> do), după testul " if <conditie> then " , după "repeat" ,sau înainte de "until" (condiția repetitivei cu test final - "repeat",aceasta fiind pusa pe post de "end;") .
Este o instrucțiune pentruafișarea pe ecran a unui text (șir de caractere) sau a valorii unor constante, unor variabile sau unor expresii, exceptând date de tip vector sau fișier. Conținutul a ceea ce urmează să fie afișat pe ecran este încadrat de două paranteze rotunde. Lista a ceea ce urmează să fie afișat pe ecran este despărțită prinvirgulă. InstrucțiuneaWRITELN face aceeași acțiune ca și WRITE dar după afișare mută cursorul la începutul rândului următor al ecranului.
write ('a=', a);
Descriere: afișează pe ecran șirula= după care afișează valoarea variabilei sau constanteia.
Este o instrucțiune care citește de la tastatură o variabilă, cu excepția tipului boolean și a vectorilor. Variabilele se scriu între paranteze și, dacă sunt mai multe variabile, se despart prinvirgulă. Instrucțiunea READLN face același lucru ca READ dar așteaptă un <ENTER> înainte de a prelucra datele primite. În caz că sunt citite mai multe variabile, introducerea acestora se va face prin separarea valorilor prin spații albe (<Space>, <TAB> sau <ENTER>).
- write ('Dati x='); readln (x);
Descriere: afișează pe ecranDati x= după care citește de la tastatură valoarea variabileix.
Descriere: așteaptă apăsarea tastei <ENTER> după care continuă cu restul de instrucțiuni din program.
Este o instrucțiune de citire de la tastatură a caracterelor (valori de tip char) fără ca acestea să fie afișate pe ecran. Variabila caracter citită se scrie între paranteze.
write ('Parasiti aplicatia? (d/n)'); readkey (x);
Descriere: afișează pe ecranParasiti aplicatia? apoi așteaptă să fie introdusă de la tastatură o literă.
Transformă un număr într-un string (șir de caractere). Odată transformat în string, numărului nu i se mai pot efectua operații matematice deoarece acum este considerat un cuvânt.
str (x, s);
Descriere: Creează un string din numărulx în șiruls.
Transformă un string într-un număr atât timp cât stringul conține o reprezentare validă.
val (s, x, er);
Descriere: creează un număr din stringuls în variabilax. Dacă în timpul execuției se întâlnește o eroare, variabila de tip integerer va conține poziția caracterului de la care s-a constatat că nu se poate transforma stringul în număr. Spre exemplu, pentru șirul de caractere '1234a6 ' variabilaer va conține5.
Oprește forțat un ciclu (FOR, REPEAT sau WHILE), chiar dacă acesta nu s-a încheiat.
Oprește automat programul.
Oprește automat programul cu posibilitatea de transmite sistemului de operare un cod de eroare.
halt (5);
Descriere: oprește programul și transmite codul de eroare 5.
Șterge o porțiune dintr-un string.
delete (s, 8, 4);
Descriere: șterge4 caractere din șiruls începând cu poziția8.
Introduce un șir de caractere în altul.
insert ('abc',s, 8);
Descriere: introduce în șiruls pe poziția8 caractereleabc.
