Реализовать функцию Delete(s, i), возвращающую строку, полученную удалением из строки s всех символов, начиная с i-го. Не использовать стандартную процедуру Delete.