program ReplaceWords;

var
word: string;

begin
word := 'ТУРБИНА';
writeln('Исходное слово: ', word);

word := 'РЕЗИНА';
writeln('Заменяем на: ', word);

word := 'МОНИТОР';
writeln('Исходное слово: ', word);

word := 'КОНТАКТ';
writeln('Заменяем на: ', word);
end.