Составьте программу вычисления количества трёхзначных чисел-палиндромов(чисел,которые читаются одинаково слева направо и справа налево
// PascalABC.NET 3.3, сборка 1576 от 16.11.2017 // Внимание! Если программа не работает, обновите версию! begin var ans:integer; for var i:= 101 to 999 do if (i div 100) = (i mod 10)then inc(ans); Writeln(ans); end.