Строчка содержит одно слово-шалаш. Проверить будет ли оно читаться одинаково справа

Строка содержит одно слово-шалаш. Проверить будет ли оно читаться идиентично справа налево и слева вправо.

Задать свой вопрос
1 ответ
Var s : string;
    b : boolean;   
 i, len : integer;begin     readln(s);     len := length(s);     b := true;     for i := 1 to len div 2 do     if s[i] lt;gt; s[len - i + 1] then        begin             b := false;             break;        end;     writeln(b);end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт