% !TEX lualatex

\documentclass[a4paper]{article}
\usepackage[margin=1cm]{geometry}
\usepackage{ProfLycee}
\useproflyclib{piton}

\begin{document}

\begin{CodePiton}{}
#environnement piton avec numéros de ligne, pleine largeur, style moderne
def arctan(x,n=10):
  if x < 0:
    return -arctan(-x) #> (appel récursif)
  elif x > 1:
    return pi/2 - arctan(1/x) #> (autre appel récursif)
  else:
    return sum( (-1)**k/(2*k+1)*x**(2*k+1) for k in range(n) )
\end{CodePiton}

\end{document}

% !TEX lualatex

\documentclass[a4paper]{article}
\usepackage[margin=1cm]{geometry}
\usepackage{ProfLycee}
\useproflyclib{piton}

\begin{document}

\begin{PseudoCodePiton}[Filigrane]{}<start=10>
Algorithme : Périmètre de rectangles
Variables : Long, Larg, Perim (réels)
            Choix (chaîne) # pour refaire ou non l'exécution

Début
  # initialisation de l'indicateur pour entrer dans la boucle
  Choix ← "o"
  # boucle TantQue permettant de refaire le traitement selon le choix
  TantQue Choix = "o" Faire
    # traitement
    Afficher("Donner les dimensions du rectangle") et Saisir(Long,Larg)
    Perim ← 2 × (Long + Larg)
    Afficher("Le périmètre du rectangle est", Perim)
    #saisie du choix de recommencer ou non
    Afficher("Voulez-vous continuer (o/n) ?") et Saisir(Choix)
  FinTantQue
Fin
\end{PseudoCodePiton}

\end{document}