Svp c urgent besoin d aide

Bonjour,
je suis un debutant en programmation et je souhaite que vous m aidez sur cette exercice
On désire effectuer plusieurs opérations sur un tableau d’entiers afin d’arriver à calculer tous les diviseurs des entiers le constituants. On dispose donc de la déclaration suivante :
TabEntiers : tableau [1..100] d’entiers ;
Tab : tabEntiers ;
1. Ecrire une fonction Saisie qui lit une suite d’entiers terminée par la valeur –1 et les place dans le tableau tab. Les entiers du tableau sont strictement positifs. La fonction retourne le nombre d’entiers effectivement lus.
2. Ecrire une procédure Diviseur permettant de calculer les diviseurs d’un entier du tableau tab passé en argument. Cette procédure aura comme résultat l’ensemble des diviseurs placés dans un tableau tabDiv.

Procédure Diviseur (V tab : tabEntiers, R tabDiv : tabEntiers)
3. Ecrire une fonction Addition permettant de calculer la somme des éléments du tableau tabDiv passé en argument.

4. Ecrire un algorithme sommeDiviseurs qui calcule et affiche la somme de tous diviseurs des entiers du tableau tab. Cet algorithme fait appel aux sous-algorithmes (procédures et fonction) des questions précédentes.
merci de votre compréhension