\documentclass[a4paper,10pt]{article}
\usepackage[utf8]{inputenc}% ou \usepackage[latin1]{inputenc}
\usepackage[T1]{fontenc}
\usepackage{lmodern}
\usepackage[french]{babel}
\usepackage{algobox}

\begin{document}

\begin{algobox}
\;   \VARIABLES
\;     k \ESTDUTYPE NOMBRE
\;     n \ESTDUTYPE NOMBRE
\;     p \ESTDUTYPE NOMBRE
\;   \DEBUTALGORITHME
\;     \POUR k \ALLANTDE 1 \A 5
\;       \DEBUTPOUR
\;       n \PRENDLAVALEUR 2*k
\;       p \PRENDLAVALEUR k*n-4
\;      \AFFICHER p
\;      \FINPOUR
\;  \FINALGORITHME
\end{algobox}

\end{document}