#! /bin/bash
echo "input nama orang"
echo -n "input nama r="
read r
echo
echo "hudha dhul & $r satukan!!!!"
---------------------------------------------------------------------
var nama : string;
urutan, posisi: integer;
begin
nama:='Huda Dhul';
writeln('Yang ini delete');
for urutan:=1 to 9 do
begin
posisi:= 11 - urutan;
delete(nama, posisi, 1);
writeln(nama);
end;
writeln;
nama:='HudaDhul';
writeln('Yang ini insert');
writeln('Sebelum di Insert : ', nama);
insert('-', nama, 5);
writeln('Setelah di Insert : ', nama);
readln;
end.