Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
cabinamaksarov
28.06.2021 06:01 •
Информатика
Составить программу: является ли слово пилигримом
Показать ответ
Ответ:
Iist
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 оценок)
Ответ:
Pumpkinjeck
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 оценок)
Популярные вопросы: Информатика
юличеноккалина
16.11.2022 20:10
Посчитай сколько бит информации содержит 1 байт?...
nasik134
09.08.2020 18:07
База данных может работать без форм?...
silinskay
04.04.2023 06:22
Выпишите все десятичные числа, не превосходящие 70, запись которых в четырнадцатеричной системе счисления оканчивается цифрой 8....
DashaLatysheva1
04.04.2023 06:22
Какое из имен удовлетворяет логическому условию(первая буква гласная→вторая гласная)vпредпоследняя согласная а)иван б)анна в)петр г)михаил...
kotflin
04.04.2023 06:22
Сегодня на уроке информатики изучали маски файлов. маской называется строка-шаблон, знак вопроса в записи которой соответствует любому одному символу, а звездочка...
Karinaa11111
04.01.2022 11:08
1.составьте блок-схему алгоритма и программу вывода на экран всех четных двузначных чисел. 2.составьте блок-схему алгоритма и программу вычисления суммы всех трехзначных...
Elkahit
29.08.2020 14:05
Считая что каждый символ кодируется 2 байтом,оцените информационный объем следущего предложения в кодировке ascii...
uliana115
29.07.2021 12:54
Обработка одномерных массивов. пользователь вводит слово. подсчитать количество букв d, c и k в этом слове....
thedesxte
22.03.2021 05:08
Сочинение.2 класс.тема.родной край.вопросы: как называется место,где человек родился и провёл детские годы? в каком городе ты живешь? где находится твой город?...
tibeck120
22.03.2021 05:08
ответьте на вопросы по повести заколдованное место н.в.гоголя: 1.истрия создания 2.когда написана 3.главные герои 4.какие фольклорные элементы использовал гоголь...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Внимание! Если программа не работает, обновите версию!
begin
var s:=ReadlnString;
if s=s.Reverse.JoinIntoString then Writeln('Это палиндром')
else Writeln('Это не палиндром')
end.
Пример
шалаш
Это палиндром
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.