TURBO PASCAL:Учебное пособие. Терёхин В.В. - 76 стр.

S:= 'ABCDEFG’;
delete (S, 3, 4) ;
После вызова процедуры переменная S будет иметь значение
'ABG'.
        2)
S:= 'мама мыла раму';
delete (S, 6, 5);
Переменная S будет иметь значение 'мама раму'.

procedure Insert(S1: String; Var S2: String; n: integer); - проце-
дура вставляет строку S1 в строку S2, начиная с позиции n.
       Примеры:
       1)
S:= 'ABCDE';
S1:= 'GHIJ’;
insert(S1, S, 3);
После вызова процедуры Insert переменная S будет иметь зна-
чение 'ABGHIJCDE'.
       2)
S:= 'мама раму';
S1:= 'мыла ';
insert(S1, S, 6) ;
Переменная S будет иметь значение 'мама мыла раму'.
       В отличии от массивов, строки можно выводить на эк-
ран и вводить с клавиатуры используя операторы Write и
Writeln, Read, Readln.
       Примеры:
Write('мама ');
Write('мыла ') ;
S': = 'раму' ;
Writeln (S) ;
Read(S);
Readln(SI) ;

       Задача:
                                                                 76