1. 73 + (16 + 4 + 1) = 94.
2. 52 в двоичную = 110100 + 11011 = 1001111.
3. 11101 - 13 = 16 + 8 + 4 + 1 = 29 - 13 = 16.
4. 125 в двоичную = 1111101 - 10110 = 1100111
5. 77 + 11011 = 77 + 16 + 8 + 2 + 1= 104.
6. 11111 - 10001 = 1110.
7. 138 - 10011 = 138 - 16 - 2 -1 = 119.
8. 10111 + 31 = 10111 + 11111 = 110110.
9. 1111111 - 11111 = 1100000.
10. 11100 - 10011 = 1001 = 9.
Проверь в интернет калькуляторах, так как делал в уме. Да и на ютубе посмотри обязательно видео-уроки про Системы счисления! Это не трудно! Удачи!
Тут для двух первых примеров есть решения, еще надо?
<u>PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
<u>№1</u>
begin
var a:=ReadInteger.ToString;
Writeln(a=a.Inverse)
end.
<u>Примеры</u>
2441
False
1991
True
<u>№2</u>
begin
var n:=int64(ReadInteger);
var s:=n.ToString;
var s2:=(n*n).ToString;
if s2.Right(s.Length)=s then Writeln('Афтоморф')
else Writeln('Не автоморф')
end.
<u>Примеры</u>
625
Афтоморф
1020
Не автоморф