Есть ответ 👍

Дан произвольный текст. Определить является ли он палиндромом (например шалаш-казак) ПАЙТОН​

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

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

WoRT1
4,6(26 оценок)

var s:string; l,i,k:integer;

begin

readln(s);

l:=length(s);

k:=0;

for i:=1 to l div 2 do

if s[i]=s[l-i+1] then k:=k+1;

if k=l div 2 then writeln(s,' - палиндром')

else writeln(s,' - не палиндром');

end.

Пример:

kazak

kazak - палиндром

Объяснение:


Ssd на 480 потомучто у ссд читается файлов и информации быстрее чем скорость шпинделя у хдд, важна не память а частота вращения шпинделя или скорость чтения файлов. незачто

Популярно: Информатика