Составить программу, в которой получить как можно больше слов, образованных из слова информатика. вывести на экран длину исходного слова. (программа на языке паскаль, использовать команды: length, copy, delete, insert, concat.) желательно сделать до завтрешнего дня, информатика завтра будет. заранее )

Из слова "информатика" так много всего можно сделать!
Вот небольшая часть:
var s,s1:string;
begin
s:='информатика';

s1:=copy(s,3,5);
writeln(s1,'-',length(s1));

s1:=s;delete(s1,8,4);
delete(s1,1,2);
writeln(s1,'-',length(s1));
//3
s1:=s;delete(s1,1,5);
delete(s1,3,2);
insert(copy(s,5,1),s1,3);
writeln(s1,'-',length(s1));
//4
s1:=copy(s,5,1)+copy(s,4,1)+copy(s,6,2)+copy(s,2,1)+copy(s,8,3);
writeln(s1,'-',length(s1));
//5
s1:=concat(copy(s,3,3),copy(s,8,1));
writeln(s1,'-',length(s1));
end.