Составьте программу получения слова «правило» из слова «операция», используя процедуры Delete, Insert



Составьте программу получения слова «правило» из слова «операция», используя процедуры Delete, Insert.    
program zad_8_nica;
var s1: string;
BEGIN
   s1:='операция';
   Delete(s1, 1, 1);
   Delete(s1, 2, 1);
   Delete(s1, 4, 1);
   Delete(s1, 5, 1);
   Insert('в', s1, 4);
   Insert('ло', s1, 6);
   writeln (s1);
END.