Var
i, n: integer;
begin
readln(n);
for i := 10 to 99 do
if (i mod 10 + i div 10 = n) then
writeln(i);
end.
<span>var {секция описания переменных}
Number,Num1,Num2,Sum: integer;
begin{начало программы}
write('Введите двухзначное число: ');//Вывод строки на экран
read(Number); //переменная Number получает значение с клавиатуры
Num1 := Number div 10; //В Num1 целая часть от деления Number на 10
Num2 := Number mod 10; </span>//В Num2 остаток от деления Number на 10<span>
Sum := Num1 + Num2; //находим сумму Num1 и Num2
write('Сумма двух чисел — ',Sum);//вывод результата на экран
end. {конец программы}</span>
A = list(map(int, input().split()))
print(sum(a))
1) Переводим в двоичную систему счисления, деля число целочисленно на 2 до тех пор, пока не получится 0.
Записываем остатки от деления в обратном порядке.
1100000110011 - ответ
2)Разбиваем двоичное число на тройки, начиная с младшего разряда: [001][100][000][110][011]
Каждую тройку переводим в восьмиричную систему счисления и записываем "как есть": [1][4][0][6][3].
14063 - ответ
3)Разбиваем двоичное число на четверки, начиная с младшего разряда: [0001][1000][0011][0011]
Переводим каждую четверку в шестнадцатиричную сисиему счисления и записываем "как есть": [1][8][3][3].
1833 - ответ.