Из слова видеоадаптер составляет слова: диод,радио,партер

var
s: string;

begin
s := 'видеоадаптер';
writeln(s);
writeln(s[3] + s[2]+ s[5] + s[3]);
writeln(s[12] + s[6] + s[3] + s[2] + s[5]);
writeln(s[9] + s[6] + s[12] + s[10] + s[11] + s[12]);
end.