Copy & Delete

COPY (str:string;pos:byte;quant:byte):string;

Exemplo

Frase :=‘Estão aqui, estão na rua’;

Pedaco := copy (frase;7;3);

Writeln (pedaco);

DELETE (var str:string;pos:byte;quant:byte);

Exemplo

Frase:=‘Turbo Pascal 7.0’;

Delete (frase 7,7);

Writeln (frase);

R:turbo 7.0