В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
sandrokapanadze777
sandrokapanadze777
27.01.2022 03:56 •  Информатика

Составить программу: является ли слово пилигримом

Ответ:
arte6767
arte6767
08.10.2020 10:25
PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var s:=ReadlnString;
  if s=s.Reverse.JoinIntoString then Writeln('Это палиндром')
  else Writeln('Это не палиндром')
end.

Пример
шалаш
Это палиндром
0,0(0 оценок)
Ответ:
Yana7112
Yana7112
08.10.2020 10:25
Var s:string; i:integer; b:boolean;
begin
readln(s);
k:=length(s); b:=true
for i:=1 to k div 2 do if s[ i]<>s[ k-i+1] then b:=false;
writeln(b);
readln
end.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?