Написать программу которая подтверждает числа полиморфы

Написать программу которая подтверждает числа полиморфы
Гость
Ответ(ы) на вопрос:
Гость
//PascalABC.NET 3.1 сборка 1200 begin   var n := ReadInteger('n =');   if n < 0 then begin     writeln('Число отризательное и не может быть перевертышем');     Halt;   end;     var s := n.ToString();   if ReverseString(s) = s then     writeln('Перевертыш')   else  writeln('Не перевертыш'); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы