Algorithme sur alg'exec qui calcule les impôts dû. sujet

Bonjour, voila, j'ai un algorithme dans un language que je connait pas et je voudrais l'avoir en language alg'exec.
Vu que alg'exec n'est pas connu, j'aimerais que vous m'aider.

voici l'algorithme à traduire: MERCI

Algorithme impôts

variables
NOM : chaine
NC, NB, I : entier
R, N, QF, IM, P1, P2, P3, P4 : Réel

DEBUT
P1 <- 4055
P2 <- 7976
P3 <- 14039
P4 <- 22732
I <- 0
SAISIR "Donner le nombre de foyers concernés " ,NB
TANTQUE I < NB FAIRE
AFFICHER "Donner le nom du contribuable "
SAISIR NOM
AFFICHER "Donner le revenu imposable "
SAISIR R
AFFICHER "Donner le nombre de personnes à charge "
SAISIR NC
SI NC<3
ALORS N <- 2 + (0.5*NC)
SINON N <- NC + 1
FINSI
QF <- R/N
SI QF <= P1
ALORS IM <- 0
SINON
SI QF <= P2
ALORS IM <- (R*0,0875)-(N*334,54)
SINON
SI QF <= P3
ALORS IM <- (R*0,2175)-(N*1411.30)
SINON
SI QF <= P4
ALORS IM <- (R*0,3175)-(N*2815,23)
SINON IM <- (R*0,4175)-(N*5088,40)
FINSI
FINSI
FINSI
FINSI
I <- I+1
AFFICHER NOM , " doit payer ", IM," d'impôts."
FIN TANT QUE
FIN