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

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