q*pu
RoundFloat(q*pu, 2); // 2 = nombre de décimales
procedure RoundFloat(var Value: Extended; const Decimales: Integer = 2); var n: Extended; begin n := Round(IntPower(10, Decimales)); Value := Round(Value * n) / n; end;
var M: Extended; begin M := q*pu; RoundFloat(M, 2); // 2 chiffres après la virgule end;
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question