segunda-feira, 3 de janeiro de 2011

Insert & Val

INSERT (substr:string;varSTR:string;pos:byte);
ExemploFrase:=‘Curso de informática’);
Insert (‘Micro’;Frase;10)
Witel (frase);

Val (str:sring;var num :integer/read var erro:integer);
Exemplo
Codigo:=‘017348’;
Val(codigo,numeracao,erro);
Writeln (numero);
Writeln (erro);

0 comentários:

Postar um comentário