// Pseudocod

numara = 0 - numarul de cuvinte unice
n - numarul de cuvinte din sirul initial, primit ca input
sir[] - sirul initial de string-uri, primit ca input
sol[] - cuvintele unice din sir
fr[] - vectorul de frecventa al cuvintelor unice din sir

citeste n

pentru i <- 1, max_cuvinte
|	fr[i] = 0
|-------\\

pentru i <- 1, n executa
|	citeste sir[i]
|-------\\

pentru i <- 1, n-1 executa
|	pentru j <- i+1, n executa
|	|	daca sir[i]  egal cu sir[j] atunci
|	|	|	scrie "Duplicat: $sir[j]$"
|	|	|	daca sir[j] nu este deja in sol[] atunci
|	|	|	|	sol[numara++] = sol[j]
|	|	|	altfel
|	|	|	|	pentru k <- 1, numara executa
|	|	|	|	|	daca sol[k] egal cu sir[j] atunci
|	|	|	|	|	|	fr[k]++
|	|	|	|	|	|-------\\
|	|	|	|	|
|	|	|	|	|-------\\
|	|	|	|
|	|	|	|-------\\
|	|	|
|	|	|-------\\
|	|
|	|-------\\
|
|-------\\

scrie "Cuvintele unice, cu frecventele lor de aparitie, sunt"

pentru i <- 1, numara executa
|	scrie "$sol[i]$ - $fr[i]$"
|-------\\