Subprograme

       Subprogramul este prin urmare un ansamblu alcatuit din tiputi de date, variabile si instructiuni scrise in vederea unei anumite prelucrari (calcule, citiri, scrieri), care se identifica printr-un nume. În limbajul Pascal, avem doua tipuri de subprogram : procedurile și funcțiile. Deosebirea dintre ele constă în numărul de valori calculate și returnate programului apelat. Procedurile calculează mai multe valori sau nici una, iar funcțiile returnează o singura valoare asociată numelui funcției. Procedurile  și funcțiile pot fi standard(predefinite în unitul sistem), cât și ne standard(definite de utilizator). Procedurile și funcțiile ne standard trebuie declarate obligatoriu înainte de a fi apelate.   

Exemplu de probleme:

Uses CRT;

var t,i:byte; n:longint;
function nr(n:longint; c:byte): byte;
var k:byte;
begin
k:=0;
while n<>0 do
begin
if n mod 10=c then k:=k+1;
n:=n div 10
end;
nr:=k
end;
begin
write(‘n=’); readln(n);
t:=0;
for i:=0 to 9 do
if nr(n,i)>0 then t:=t+1;
writeln(t)
end.