Discussion :

[Roland Chastain]

Bonjour tout le monde !

Je cherchais une fonction pour obtenir le nombre de chiffres d'un nombre. Je suis tombé sur une formule,

On en déduit alors que n
est l’entier immédiatement supérieur (ou égal) à log(N)
.

que j'ai traduite de la façon que voici :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
(* https://www.mathweb.fr/euclide/2019/03/02/nombre-de-chiffres-dun-nombre/ *)
 
uses
  SysUtils, Math;
 
const
  N = 10;
 
var
  f: float;
  i: integer;
 
begin
  f := Log10(N);
  i := Ceil(f);
 
  WriteLn(i);
end.

Mais pour 10, ça renvoie 1 au lieu de 2.

[JP CASSOU]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
i = Trunc(Log10(N)) + 1;

[Roland Chastain]

Merci !

[Guesset]

Bonjour,

Il serai peut être utile de faire un test de 0 et de signe : si N = 0 retourner 1 sinon trunc(log10(abs(N)))+1. Si on considère que le signe - doit être compté il faut ajouter 1 si N < 0.

Salutations

[Roland Chastain]

Bonjour Guesset. Merci pour ces précisions.