Определить среди шестизначных чисел палиндромы (палиндромом называется число, которое читается слева направо и с права налево одина-ково) в паскаль.

// PascalABC.NET 3.1, сборка 1250 от 28.05.2016 begin   var s:=ReadInteger('Введите шестизначное натуральное число:').ToString;   if s=ReverseString(s) then Writeln('Это палиндром')   else Writeln('Это не палиндром') end. Тестовое решение Введите шестизначное натуральное число: 158851 Это палиндром