Какой текст будет выведен на экран в результате выполнения следующего фрагмента программы?
s:='Example';s0:='ABC';
Delete(s,1,3);
writeln(s);

Delete  (процедура) удаляет подстроку из строки.В твоем случае delete(s, i, k) s-исходная строка,i - с какой позиции k - сколько символов удалять.Форма записи Delete(s,1,3) означает из строки s, убрать с первого по третий символ (строку с первого элемента по третий).writeln(s) => 'mple'P.S.: s0:='ABC'; - это действительно лишнее : )