Algoritmo em pascal que calcule quantos digitos tem um determinado numero inteiro

[Visitante: raraujo27]

Galera estou iniciando no curso de Sistemas de Informação e minha professora passou uma questão sobre modularização em Pascal que ja estou tentando fazer a 3 dias e n consigo, ja tentei me basear por uma questão que calcula o CPF mas acabei foi complicando mais ainda minha cabeça. Alguem pode me ajudar? A questão é assim: Faça um algoritmo em pascal que tenha um módulo que calcule a quantidade de dígitos de determinado número inteiro. Ex: 2010 = 4 digitos, 100 = 3 digitos, 1000000 = 7 digitos.

[viniciusbmatos]

Declare a unit SysUtils no início:

uses
  SysUtils;

Depois, basta fazer:

[B]NumeroDeDigitos[/B]:=Length(IntToStr([B]Numero[/B]));

Diga se funcionou.