Составьте программу, вычисляющую, является ли данное слово "перевертышем" (так называются слова, читающиеся одинаково слева направо и справа налево, например: топот, шалаш) паскаль

Question

Информатика

Евстратий

30 ноября, 17:48

Составьте программу, вычисляющую, является ли данное слово "перевертышем" (так называются слова, читающиеся одинаково слева направо и справа налево, например: топот, шалаш) паскаль

+2

Ответы (1)

Знаете ответ на вопрос?

Натуся · Answer 1

Program u;

var s, d:string;

begin;

read (s) ; s:=lowercase (s) ;

if reversestring (s) = s then write ('Перевёртыш') else write ('Не перевёртыш') ;

end.