1. ответ: 100001000₂
11001101₂ + 111011₂ = (2⁷*1 + 2⁶*1 + 2⁵*0 + 2⁴*0 + 2³*1 + 2²*1 + 2¹*0 + 2⁰*1) + (2⁵*1 + 2⁴*1 + 2³*1 + 2²*0 + 2¹*1 + 2⁰*1) = (128 + 64 + 0 + 0 + 8 + 4 + 0 + 1) + (32 + 16 + 8 + 0 + 2 + 1) = 205₁₀ + 59₁₀ = 264₁₀ = 100001000₂
Перевод 264₁₀ в 2-ю СС (mod - остаток от деления; каждый раз число делим на 2):
264 mod 2 = 0
132 mod 2 = 0
66 mod 2 = 0
33 mod 2 = 1
16 mod 2 = 0
8 mod 2 = 0
4 mod 2 = 0
2 mod 2 = 0
1 mod 2 = 1
Остаток от деления записываем в обратном порядке. Получается: 100001000₂.
2. ответ: сума двух чисел - 100110010₂, а разность двух остальных- 1011011₂.
10011001₂ = 2⁷*1 + 2⁶*0 + 2⁵*0 + 2⁴*1 + 2³*1 + 2²*0 + 2¹*0 + 2⁰*1 = 128 + 0 + 0 + 16 + 8 + 0 + 0 + 1 = 153 ₁₀
10011001₂ (153₁₀) + 153₁₀ = 153₁₀ + 153₁₀ = 306₁₀
11011001₂ = 2⁷*1 + 2⁶*1 + 2⁵*0 + 2⁴*1 + 2³*1 + 2²*0 + 2¹*0 + 2⁰*1 = 128 + 64 + 0 + 16 + 8 + 0 + 0 + 1 = 217 ₁₀
217 ₁₀ - 126₁₀ = 91₁₀
Переводим 306₁₀ в 2-ю СС (mod - остаток от деления; каждый раз число делим на 2):
306 mod 2 = 0
153 mod 2 = 1
76 mod 2 = 0
38 mod 2 = 0
19 mod 2 = 1
9 mod 2 = 1
4 mod 2 = 0
2 mod 2 = 0
1 mod 2 = 1
Остаток от деления записываем в обратном порядке. Получается: 100110010₂.
Переводим 91₁₀ в 2-ю СС (mod - остаток от деления; каждый раз число делим на 2):
91 mod 2 = 1
45 mod 2 = 1
22 mod 2 = 0
11 mod 2 = 1
5 mod 2 = 1
2 mod 2 = 0
1 mod 2 = 1
Остаток от деления записываем в обратном порядке. Получается: 1011011₂.
Begin
Writeln('Введите A градусов');
readln(A);
Writeln('До какой температуры остужать:');
readln(N);
gradus:=100-A;minut:=1;
While (gradus>N) do
Begin
A:=A*(1-0.15);
gradus:=gradus-A;
minut:=minut+1;
end;
Writeln('Кипяток остынет до ',N,' градусов через ', minut, ' минут');
readln();
end.