Question

Составьте программу получения из слова "дисковод" слова "воск", используя операцию сцепления и функцию Copy.

Answer 1

var s: string;
begin
s:='дисковод';
writeln (copy(s,6,2)+copy(s,3,2))
end.