sub Main
'Déclatation.
Dim MontantBrutHT, Remise, NetCom, TVA, MontantTTC
Variables
NetCom, MontantTTC
Const TVA = 20%
TVA = console.ReadLine
'entrées.
console.write ("MontantBrutHT :")
MontantBrutHT = console.ReadLine
console.write ("Remise :")
Remise = console.ReadLine
'calcul.
NetCom = MontantBrutHT *remise
NetCom = console.ReadLine
MontantTTC = NetCom + TVA
MontantTTC = console.ReadLine
End sub
Un avis ?