1) Имеем → KBRA69KBK Меняем "RA6" на "FL" → KBFL9KBK Теперь "KB" на "12B" → 12BFL912BK Далее убираем 3 последних символа → 12BFL91 ответ: 1
2) Имеем → KBMAM9KBK Меняем "MAM" на "RP" → KBRP9KBK Теперь "KBK" на "1212" → KBRP91212 Далее убираем 3 последних символа → KBRP91 ответ: 1
3) Имеем → QWER3QWER1 Меняем "QWER" на "QQ" → QQ3QQ1 Теперь удаляем "3Q" → QQQ1 ответ: 4
4) Имеем: А, Б, В, И. Условия: • Начинается с согласной → Б... или В... • После гласной не стоит гласная → АБ или АВ или ИБ или ИВ • После согласной не стоит согласная → БА или БИ или ВА или ВИ • Последняя не А и не В → ...Б или ...И Варианты: 1] БВИ → После согласной стоит согласная, не подходит 2] АВИ → Начинается с гласной, не подходит 3] БАВ → Заканчивается на В, не подходит 4] БИБ → Удовлетворяет всем условиям ответ: 4
Var i,x:integer; m:array[10..20] of integer; begin randomize; for i:=10 to 20 do m[i]:=random(11)+10; for i:=10 to 20 do write(m[i],' '); writeln; x:=m[10]; m[10]:=m[20]; m[20]:=x; for i:=10 to 20 do write(m[i],' '); writeln; end.
2)
var max,min,i,x:integer; m:array[10..20] of integer; begin min:=10; max:=10; randomize; for i:=10 to 20 do m[i]:=random(100)+1; for i:=10 to 20 do write(m[i],' '); writeln; for i:=10 to 20 do begin if m[i]<m[min] then min:=i; if m[i]>m[max] then max:=i; end; x:=m[min]; m[min]:=m[max]; m[max]:=x; for i:=10 to 20 do write(m[i],' '); writeln; end.
429₁₀ = 110101101₂ = 655₈ = 1AD₁₆
10011101₂ = 157₁₀
734₈ = 476₁₀
27E₁₆ = 638₁₀
Объяснение:
429₁₀ = 1*2⁰ + 0*2¹ + 1*2² + 1*2³ + 0*2⁴ + 1*2⁵ + 0*2⁶ + 1*2⁷ + 1*2⁸ = 110101101₂
429₁₀ = 5*8⁰ + 5*8¹ + 6*8² = 655₈
429₁₀ = 13*16⁰ + 10*16¹ + 1*16² = 1AD₁₆
10011101₂ = 1*2⁰ + 0*2¹ + 1*2² + 1*2³ + 1*2⁴ + 0*2⁵ + 0*2⁶ + 1*2⁷ = 157₁₀
734₈ = 4*8⁰ + 3*8¹ + 7*8² = 476₁₀
27E₁₆ = 14*16⁰ + 7*16¹ + 2*16² = 638₁₀