Pascal – dawniej jeden z najpopularniejszych języków programowania, uniwersalny, wysokiego poziomu, ogólnego zastosowania, oparty na języku Algol. Został opracowany przez Niklausa Wirtha w 1970 roku. Nazwa języka pochodzi od nazwiska francuskiego fizyka, matematyka i filozofa Blaise Pascala. Pierwotnie służył celom edukacyjnym do nauki programowania strukturalnego[potrzebne źródło]. Popularność Pascala w Polsce była większa niż w innych krajach ze względu na dostępność kompilatorów w pirackich wersjach (zanim pojawiło się prawo ochrony własności intelektualnej), prostotę języka oraz jego popularyzację przez wyższe uczelnie. Szczyt popularności tego języka przypadł na lata 80. i początek 90 XX wieku. Wraz ze zniesieniem ograniczeń COCOM, upowszechnieniem się sieci oraz systemu Unix (następnie Linuksa) stopniowo został wyparty przez C i C++.
Program sortujący tablicę liczb metodą bąbelkową.
program sortowanie;
const zakres = 99;
var
Liczby:array [1..zakres] of integer;
i,j,k,n:integer;
procedure czytaj;
begin
writeln('Program sortuje dane metoda babelkowa');
write('Podaj ilosc liczb: '); read(n);
for i:=1 to n do begin
write('Liczba ',i,' = '); read (Liczby[i]);
end;
end;
procedure pisz;
begin
writeln('Oto posegregowane elementy:');
for i:=1 to n do write(liczby[i],' ');
readln;
end;
begin
czytaj;
for i:=2 to n do begin
for j:=n downto i do begin
if Liczby[j-1] > Liczby[j] then begin
k:=liczby[j-1];
Liczby[j-1]:=Liczby[j];
Liczby[j]:=k;
end;
end;
end;
pisz;
readln;
end.