Дано трёхзначное число. Напишите в паскаль программу, которая определяет:

Является ли число "перевёртышем", т. е. числом, десятичная запись которого читается одинаково слева направо и справа налево.

Question

Акакий

19 января, 15:50

+2

Ответы (1)

Знаете ответ на вопрос?

Юния · Answer 1

Var

a:integer;

begin

writeln ('a?') ;

readln (a) ;

if (a mod 10) = (a div 100) then

writeln ('Yes')

else

writeln ('N') ;

end.