Programul complet scris in limbajul Pascal