Слово называется палиндромом, если оно читается одинаково, как слева направо, так и справа налево. требуется определить, какое минимальное количество букв надо добавить к входному слову справа, чтобы оно стало палиндромом. на вход программе подается строка, состоящая не более чем из 255 символов. выведите искомое число. паскаль

234

302

Посмотреть ответы 2

Ответы на вопрос:

anastasia120996

Информатика

4,7(55 оценок)

Var s : string; function ispali(ss : string) : boolean; begin if length(ss)> 0 then ispali: =(ss[1]=ss[length(ss)]) and ispali(copy(ss,2,length(ss)-2)) else ispali: =true; end; function ntopali(ss : string) : integer; begin if ispali(ss) then ntopali: =0 else ntopali: =1+ntopali(copy(ss,2,length(ss)-1)); end; begin s: ='abcdc'; // readln(s); writeln(ntopali(s)); end.