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

Question

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

Answer 1

Пусть S - строка в которой "компьютер".
var S: string[9];
begin
S:='компьютер';
delete(S,3,1);{получаем "копьютер"}
delete(S,5,2);{"копьер"}
delete(S,6,1);{"копье"}
write(S);
end.

Comments

процедура delete(S,pos,N) удаляет из строки S, начиная с символа pos, N символов