Вопрос по информатике:
Написать через программу ПаскальABC.NET
8.4. Ввести текстовую строку S, состоящую из прописных букв русского алфавита. Выяснить, является ли эта строка палиндромом, то есть, читается ли она одинаково слева направо и справа налево.
Пример: строка ‘ТОПОТ’ является палиндромом, а строка ’ТОПОР’ – нет.
Получить результат для следующих исходных данных:
Исходные данные
A) S=’ШАЛАШ’
B) S=’АННА’
C) S=’ОКНО’
баллов даю много задача трудная
- 19.04.2018 16:54
- Информатика
- remove_red_eye 16981
- thumb_up 27
Ответы и объяснения 1
Var s : string;
i, j, n : integer;
f : boolean;
begin
readln(s);
n := length(s);
i := 1; j := n;
f := false;
while (i <= j) do
begin
if(s[i] = s[j])
then f := true
else f := false;
i := i + 1;
j := j - 1;
if not f
then break;
end;
if f
then write('Палиндром')
else write('Не палиндром');
end.
- 20.04.2018 05:10
- thumb_up 24
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.