val

val

Usado para converter uma cadeia de caracteres em um inteiro ou real.

Sintaxe

val( expressãoLiteral , variável , codigoErro ) ;

Onde:

expressãoLiteral é uma cadeia de caracteres ou uma expressão envolvendo a concatenação de várias cadeias.
variável é uma variável do tipo integer ou real.
codigoErro é uma variável do tipo integer.

Funcionamento

Se a cadeia de caracteres puder ser convertida, variável receberá o valor proveniente da conversão, e codigoErro armazenará o valor zero.
Se a cadeia de caracteres não puder ser convertida, variável receberá o valor zero, e codigoErro armazenará a posição na cadeia em que foi encontrado um caractere inválido.

Exemplo

A conversão da cadeia "123" armazena em variável o valor 123 e armazena em codigoErro o valor 0.
A conversão da cadeia "abc" armazena em variável o valor 0 e armazena em codigoErro o valor 1.
A conversão da cadeia "123v5" armazena em variável o valor 0 e armazena em codigoErro o valor 4.

Exemplo

Program PascalZIM;

var

cadeia: string;

nro, codigoErro: integer;

begin

write( 'Digite um número inteiro: ' );

readln( cadeia );

val( cadeia, nro, codigoErro );

if ( codigoErro = 0 ) then

writeln( 'O número lido e convertido foi: ' , nro )

else

writeln( 'Inteiro inválido, e o código de erro foi: ' , codigoErro );

end.