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

Question

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

Экономика

Гость

Ответ(ы) на вопрос:

Accepted Answer

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] <> s[len - i + 1] then begin b := false; break; end; writeln(b);end.