Фото, (gif)ки, э это чёртово правило о длииных ответах
Var
a : array [1..100] of longint;
k,i : longint;
begin
k:=0;
for i:=1 to 5 do begin read(a[i]); if a[i]=k then k:=k+1; end;
writeln(k);
<span>end.</span>
Сначала надо перевести всё в десятичную систему счисления.
<em>Для перевода из </em><em>N </em><em>системы счисления надо умножать на эту же </em><em>N</em>
43₈ = 3 * 8⁰ + 4 * 8₁ = 3 + 32 = 35₁₀
10100₂ = 0 * 2⁰ + 0 * 2¹ + 1 * 2² + 0 * 2³ + 1 * 2⁴ = 0 + 0 + 4 + 0 + 16 = 20₁₀
----------------------------------------------------------------------------------
у 16 счет немного другой: 0123456789ABCDEF (в 10)
A = 10, B = 11, C = 12, D = 13, E = 14, F = 15
----------------------------------------------------------------------------------
B₁₆ = 11₁₀
40₁₀ : (35₁₀ - 20₁₀ - 11₁₀) = 40 : 4 = 10
Ответ: 10
Под буквой Б, я это вчера сделал