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

Question

Информатика

Александр

18 июня, 18:49

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

+5

Ответы (1)

Знаете ответ?

Полактия · Answer 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] s[len - i + 1] then begin b : = false; break; end; writeln (b) ; end.