Дан произвольный текст. Определить является ли он палиндромом (например шалаш-казак) ПАЙТОН
283
473
Ответы на вопрос:
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 потомучто у ссд читается файлов и информации быстрее чем скорость шпинделя у хдд, важна не память а частота вращения шпинделя или скорость чтения файлов. незачто
Популярно: Информатика
-
666Лиза6661128.09.2021 09:23
-
tagirok452508.03.2022 17:55
-
Kkb19426.03.2021 16:59
-
ImHomme22.09.2021 15:10
-
anarrzayev93p09qob24.04.2022 05:50
-
ge200401.07.2020 20:28
-
nikitta7628.01.2023 13:49
-
55555Даша1111111111127.07.2021 12:43
-
vladkabanets05.08.2022 00:06
-
Dymai1106.01.2021 16:05