\documentclass{article}
\usepackage{mathtools}
\usepackage[linesnumbered,ruled,vlined]{algorithm2e}
\begin{document}
\begin{algorithm}
\caption{Déterminier le caractère parfait ou non d'un nombre strictement positif}
\SetAlgoVlined
\SetKwInOut{Input}{input}
\SetKwInOut{Output}{output}
\Input{N un entier...}
\Output{nombre\textunderscore parfait un boolean}
\tcc{initialisation des deux variable sommediviseur et diviseur de deux varaible entiére}
somme\textunderscore diviseur $\leftarrow 0$
diviseur $\leftarrow 1$
\tcc{calculer la some de diviseur et comparer cetter somme avec le nombre N}
\While{diviseur $< N$}{
\If{N mod diviseur = 0}{
somme\textunderscore diviseur $\leftarrow somme\textunderscore diviseur + diviseur$
diviseur $\leftarrow diviseur + 1$
}
}
nombre\textunderscore parfait $\leftarrow (N = somme\textunderscore diviseur )$ $\wedge (N \neq 0)$
\tcc{retourner le résultat}
\KwRet{nombre ...}
\label{alg:PoEG}
\end{algorithm}
\listofalgorithms
\end{document}\end{document}