Программа Паскаль. Составить программу, чтобы получились новые слова из слова informatica. Слова, которые должны получиться: forma, mat, tic, tir

Предыдущий
вопрос Следующий
вопрос

program informatica;

var
word, newWord1, newWord2, newWord3, newWord4: string;

begin
word := 'informatica';

newWord1 := copy(word, 5, 5);
newWord2 := copy(word, 7, 3);
newWord3 := copy(word, 9, 3);
newWord4 := copy(word, 1, 3);

writeln('New words:');
writeln(newWord1);
writeln(newWord2);
writeln(newWord3);
writeln(newWord4);
end.