Дана строка. найти и напечатать все слова в этой строке , которые являются палиндромами.програмирование

// pascalabc.net 3.0, сборка 1139 от 10.01.2016 begin   var s: =readlnstring('вводите: ');   s.towords.where(x-> x=reversestring(; end. тестовое решение: вводите: дед иван достал наган и пошел с ним в шалаш дед наган и с в шалаш вариант, если исключить однобуквенные: // pascalabc.net 3.0, сборка 1139 от 10.01.2016 begin   var s: =readlnstring('вводите: ');   s.towords.where(x-> x=reversestring(       where(x-> x.length> 1).println; end. тестовое решение: вводите: дед иван достал наган и пошел с ним в шалаш дед наган шалаш

На java: class searchpalin{   public static void main(string args[]){   string palinstring = new java.util.scanner(system.in).nextline();   system.out.print("\nпалиндром(-ы): \n  ");   for(int wordstart = 0, wordend = 0; wordend< palinstring.length(); wordend++)     if(wordend+1==palinstring.length() || palinstring.charat(wordend+1)==' '){   string wordbeginning = "", wordending = "";   for(int wordbe = wordstart; wordbe< wordend+1; wordbe++)wordbeginning+=palinstring.charat(wordbe);   for(int worden = wordend; wordstart-1< worden; +=palinstring.charat(worden);   if(wordbeginning.equals(wordending)){   for(int palinword = wordstart; palinword< =wordend; palinword++)system.out.print(palinstring.charat(palinword));   system.out.print("\n  ");   } wordstart = wordend+2;     }   } }

Окно программы tux point может быть уменьшено до 640 × 480 , а также может быть развернуто в полноэкранный режим скрывая "рабочий стол"