Transformar número em extenso

[allancarlos123 0]

Bom dia.
Meu professor de lógica passou esse exercícios.
Leia um número digitado entre 1 e 1 mil e escreva por extenso.
Tenho um breve conhecimento em Pascal, mas não tenho a mínima de ideia de como fazer, tentei com números pequenos de 1 até 10, mas não sair do lugar.
Obs: Só aprendemos até agora nas aulas sobre:
Estruturas de decisão
Estruturas de repetição
Funções e Procedimentos de String.

[KhaosDoctor 242]

Isso é basicamente uma estrutura de repetição gigantesca onde você vai ter que cadastrar os números de 1~100 mais ou menos e depois ir repetindo.