Прикрепляю решение повторно, надеюсь у модераторов больше не возникнет вопросов...
Shift + Alt типично. или в настройках языка
Var
n, s: integer;
begin
readln(n);
s := n mod 10 + n div 10000;
writeln(s);
end.
1) 13F = 1 0011 1111
2) E98 = 1110 1001 1000
3) <span>10011111 = 9F
4) </span><span>10000001 = 81
5) </span><span>10100011 = A3</span>
<span>прямопропорционально</span>