Задача решается простым выведением нужных буква из слова.Решение:program electronika_to_other_words;var s:string;begins:=\'ЭЛЕКТРОНИКА\';writeln(s[5]+s[6]+s[7]+s[8]);//вывод первого словаwriteln(s[4]+s[6]+s[7]+s[5]);//вывод второго словаwriteln(s[2]+s[3]+s[4]+s[5]+s[7]+s[6]);//вывод третьего словаend.