Дай изображение. пожалуйста.
sum m k
0 10 0
11 8 1
10 6 2
9 4 3
8 2 4
7 0 5
далее условие k < 5 не выполняется, выходим из цикла, печатаем значение sum = 7, конец
var b:integer;
begin
readln(b);
If (b div 1000)mod 2=0 then writeln('1 цифра четная')
else writeln('1 цифра нечетная');
If ((b div 100) mod 10)mod 2=0 then writeln('2 цифра четная')
else writeln('2 цифра нечетная');
If ((b div 10)mod 10)mod 2=0 then writeln('3 цифра четная')else writeln('3 цифра нечетная');
If (b mod 100)mod 2=0 then writeln('4 цифра четная')
else writeln('4 цифра нечетная');
<span>end.</span>
1) 361*2=722<=<=7
Ответ: *2<=<=
2) 497<=49*2=98*2=196*2=392*2=784<=<=7*2=14
Ответ: <=*2*2*2*2<=<=
3)167*2*2*2*2*2=5344<=<=<=5*2=10
Ответ: *2*2*2*2*2<=<=<=*2
В записи по некоторому основанию n число шестиразрядное, поскольку оно содержит три единицы и три нуля, всего шесть цифр. При этом, самой левой (старшей) цифрой является единица. Переходим к расширенной записи, обозначая неизвестную цифру в разряде через d:
1×n⁵+d₄×n⁴+d₃×n³+d₂×n²+d₁×n¹+d₀=1104
n⁵+Δ=1104, где Δ - некоторый "довесок", равный d₄×n⁴+d₃×n³+d₂×n²+d₁×n¹+d₀
В то же время, 1104<n⁶, поскольку в противном случае число было бы семиразрядным.
n⁵≤1104<n⁶
Приближенно извлекая из 1104 корни пятой и шестой степени получаем:
3.21≤1104<4.06 и в целых числах находим, что n=4.
Переведем 1104 в систему счисления по основанию 4:
1104 / 4 = 276, остаток 0
276 / 4 = 69, остаток 0
69 / 4 = 17, остаток 1
17 / 4 = 4, остаток 1
4 / 4 = 1, остаток 0
1 / 4 = 0, остаток 1
Теперь выпишем остатки в обратном порядке, получая 101100
<em>1104₁₀ = 101100₄,</em> т.е. проверка показала, что число в самом деле содержит три единицы и три нуля.
<u><em>Ответ: 4</em></u>