Delete
Синтаксис:
procedure Delete(var s: srting; НомерСимвола: integer; Сколько: integer);Действие:
Удаляет из строки s ее часть, которая начинается с символа с номером п и состоит из i символов.
Синтаксис:
procedure Delete(var s: srting; НомерСимвола: integer; Сколько: integer);Удаляет из строки s ее часть, которая начинается с символа с номером п и состоит из i символов.