Var
i,min:integer;
m:array[1..10] of integer;
begin
for i:=1 to 10 do
begin
readln(m[i]);
if i=1 then min:=m[i];
if m[i]<min then min:=m[i];
end;
for i:=1 to 10 do
begin
if m[i]=0 then m[i]:=min;
write(m[i],' ');
end;
<span>end.</span>
<span>Находим количество символов в 2 мегабайтах при 16 битной кодировке. (2*(2^10)*(2^10)*(2^3)/16=524288=2^19 символов.</span>
Б это мой ответ ураааааааааааааааааа
Задания решаются по таблице истинности
1 - true
0 - false
я просто напишу то что должно быть в пропусках с лево на право
1) 3072 , 3
2) 16 384, 2
3) 12288. 1536
4)2 в 10, 1 (или 2 в 0)
5) 2 в 14, 2 в 1 = 2
6)не очень понятно)))) там умножить или степень в степень))) буту считать что умножить,, тогда 2 в 17, 2 в 14
а если степень в степнь то 2 в 21, 2 в 18