Devoir

[Sorellinda]

Algorithme CalculTVA
{Saisit un prix HT et prix TTC correspondant }
Constantes TVA =20.6
Titre ='Résultat'
Variables prixHT: réel
Variable PRIXTTC, montantTVA :réels {déclarations}
Début {préparation du traitement}
afficher('Donnez-moi le prix hors taxe :')
saisir(prixHT )
prixTTC <-prixHT* (1+TVA/100) {calcul du prix TTC}
montantTVA <- prixTTC- prixHT
afficher (Titre) {présentation du résultat }
afficher (prixHT,euros H.T.+TVA. ',TVA', devient. ',prixTTC',
'eurosT.T.C.')
Fin