Je veux ecrire un algorithme

A partir de la saisie du prix unitaire d'un produit et la quantité commandée, calculer le montant a payer, en detaillant le prot et la remise sachant que: Le port est gratuit si le total HT est superieur à 15 000 F. Dans le cas contraire, le port est de 3%. La remise est de 6% si le total HT est compris dans l'intervalle [0;10 000] et de 10% au dèla. 1)Ecrire l'algorithme permrttant de calculer le montant à payer. 2)Traduire votre algorithme en turbo pascal