Question

Задача в паскале:

составьте программу котораяЖ 

из слова "компилятор" составляет слова: "мотор", "комок", "пилот"

Answer 1

var a:string;

begin

readln(a);

writeln(a[3],a[2],a[8],a[2],a[length(a)]);

writeln(a[1],a[2],a[3],a[2],a[1]);

writeln(a[4],a[5],a[6],a[2],a[8]);

end.