Нет, без дополнительных программ нельзя.
uses crt;
var ch,a,b:integer;
begin
readln(Ch);
a:=ch div 10;
b:=ch mod 10;
if a >b then writeln(a) else writeln(b);
readln;
end.
Ответ:сигнал
Объяснение:читаешь задом наперед лиса получается асил убераешь первую и последнюю букву получилось СИ потом смотрим дальше показанно г на л всего СИГНАЛ
RFV,EP RE,HBR ZRJHM
DFDASD ASD ASD ASDAS DASD ASD