Алфавит системы счисления будет иметь вид
0 1 2 3 4 5 6 7 8 9 A B C D E
следующие 30 чисел
10 11 12 13 14 15 16 17 18 19 1A 1B 1C 1D 1E 20 21 22 23 24 25 26 27 28 29 2A 2B 2C 2D 2E
1) 221(8)=145(10)
109(16)=265(10)
т.к. 145<265, то 221(8)<109(16)
2) А23(16)= 2595(10)
1223(8)=659(10)
т. к. 2595>659. то А23(16)> 1223(8)
Var E,P:decimal;
i,j:integer;
Begin
E:=0;
For i:= 3 to 8 do
Begin
P:=1;
For j:= 1 to 9 do
P:=P*sqr(i+j);
E:=E+P
End;
WriteLn('S = ',E);
End.
var s:string;
k:byte;
begin
readln(s);
k:= <span>length(s);
write(k)
end.</span>
450 = <span>111000010 </span>
0000000111000010 - прямой
1111111000111101 - обратный
+1
1111111000111110 - дополнительный
з.ы числа написаны в 2битной сетке (если нужно убери первые нули)