Паскаль.
Дана строка, состоящая из латинских букв. Последовательность подряд идущих букв образует слово. Между соседними словам - один пробел.
а) Напечатать текст, составленный из последних букв всех слов
б) напечатать эту же последовательность слов, удалив из нее слова-палиндромы (читающиеся одинаково слева на право и с право на лева)

var
  s: string;

begin
  readln(s); //s := Привет дорогой мир шалаш кроет;
  write(a) );
  foreach s1: string in s.Split( ) do
    write(s1.last());
  write(#13 + b) );
  foreach s1: string in s.Split( ) do
  begin
    var b: boolean := true;
    var i: byte := 1;
    while (i <= length(s1) / 2) and b do
    begin
      b := (s1[i] = s1[length(s1) - i + 1]);
      Inc(i);
    end;
    if (not b) then
      write(s1, );
  end;
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.