Информатика, опубликовано 2018-08-22 23:49:49 by Гость
Помогите: как Определить, является ли введенное число палиндромом?
Ответ оставил Гость
var a, b: string; i: integer; begin readln(a); b := a; for i := length(a) downto 1 do b[length(a) - i + 1] := a[i]; if a = b then writeln(YES) else writeln(NO);end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.