Contoh Program Paskal Pengaplikasian Delete dan Insert

uses crt;
var A,B,C : String[30];
begin
A:='BAHASA'; delete(A,3,2); Writeln(A);
Insert('ASAM',A,5);writeln(A);
readln; end.


Hasil:

BASA
BASAASAM


Sumber : Pra UTS ATA 2011//2012 Algoritma & Pemprograman 2