Aviso do Compilador (nível 1) C4024
'function' : tipos diferentes para o parâmetro formal e real 'number'
Os parâmetros formais e reais correspondentes têm tipos diferentes. O compilador passa o parâmetro real sem alteração. A função de recebimento converte o tipo de parâmetro para o tipo esperado.