Pascal преобразовать слово "компьютер" в "копье" (операция над строками)

Есть два способа это сделать.Первый:var s:string;begins:=\'компьютер\';delete(s, 3,1); //удалим букву \'M\'delete(s, 5,2); // удалим \'ЮТ\'delete(s, 6,1); //удалим \'Р\'write(s); // выведем оставшиеся буквы, которые образуют слово копьеend.Второй:var s, ans:string;begins:=\'компьютер\';ans:=ans+copy(s,1,2); //скопируем \'КО\'ans:=ans+copy(s,4,2); //скопируем \'ПЬ\'ans:=ans+copy(s,8,1); //скопируем \'Е\'writeLN(ans); // выведем результатend.