Надо составить программу в Паскале Из слова"молоко" должно получиться слово "молоток"

Question

Надо составить программу в Паскале
Из слова"молоко" должно получиться слово "молоток"

Answer 1

Const
  s='молоко';
begin
  Writeln(Copy(s,1,4)+'т'+s[6]+s[5])
end.