Техникой и механизомандмами которые вополняют определенный вид
команд
Листинг программы и скриншот результата в приложениях.
Написано на PascalABC.NET но должно работать на всех Паскалях.
Var n,a,m,s,q:integer;
begin
read(n,a);
q:=1;
while n>0 do begin
s:=n mod 10;
if s<>a then begin
m:=m+s*q;
q:=q*10;
end;
n:=n div 10;
end;
writeln(m);
end.
? - один символ.* - любое количество символов.
Во всех случаях второй и третий символ in и далее несколько символов. В расширение повторяется mp и все. Далее разное количество символов - *.
Ответ :2
N в степени i = 2 в степени i ( N=кол-во символов)
32i=2i
2 в 5 степени =2 в степени i
2 в 5 степени = 2 в 5 степени
<span>Следовательно i=5 бит на 1 символ</span>