Зависит от того, сколько бит весит 1 символ из первой таблицы
Обще решение:
Пусть х бит - вес симола в 1 таблице, тогда вес всей первой таблицы равен 1024*х бит
Из условия вес символа в2 таблице равен (х-1) бит , значит весь все 2 таблицы равен
1024*х-1024 бит
Разница веса двух табилц равна 1024 бит, так как вес одного сивола в первой таблице равен (х-1), то в таблице 2 кол-во символом равно 1024 + 1024/(х-1)
Ответ:
1)
а)си
B) разряд
С)архив
D)основание
Е)сектор
3)
Система счисления пятеричная.
Заменим
44 на 24
34 на 19
100 на 25
11 на 6
10 на 5(все равно много)
200 на 50
130 на 40
1/10 на 1/5
6)
1. Роза жила в вазе. (Способ кодирования: глухие согласные заменяются на звонкие, звонкие - на глухие)
2. Команда. (Способ кодирования: после каждого слога вставляется слог ля)
С)информатика задом наперед
Объяснение:
1. 1)
2. 1), 3)
В обоих случаях адреса одинаковые, но в первом случае у нас доменное имя компьютера в какой-то определенной локальной сети, следовательно протокол http для доступа к нему не нужен.
Во втором оба варианта будут верны, так как это уже адрес веб-страницы.
<em>// PascalABC.NET 3.2, сборка 1437 от 03.05.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ArrRandom(ReadInteger('n='),-99,99); a.Println;
a:=a.SortedDescending.ToArray; a.Println;
Writeln('П=',a.Where(k->k mod 7=0).DefaultIfEmpty
.Aggregate(1,(i,j)->i*j))
end.
<u>Пример</u>
n= 15
80 -59 89 66 -88 -50 -16 -30 -65 -75 28 -51 56 35 36
89 80 66 56 36 35 28 -16 -30 -50 -51 -59 -65 -75 -88
П=54880
begin
var b:=ArrRandom(ReadInteger('n='),-99,99); b.Println;
b:=b+Arr(b.Sum); b.Println
end.
<u>Пример</u>
n= 15
-36 98 64 -21 -8 57 -52 56 -58 -66 -1 -60 13 22 -79
-36 98 64 -21 -8 57 -52 56 -58 -66 -1 -60 13 22 -79 -71
begin
var c:=ArrRandom(ReadInteger('n='),-99,99); c.Println;
var a:=ReadInteger('a=');
var b:=c.Where(x->x>a).ToArray;
Write('B[',b.Count,']='); b.Println
end.
<u>Пример</u>
n= 16
58 -91 12 -48 -42 1 -73 5 -47 99 -80 55 -10 31 -62 0
a= 10
B[5]=58 12 99 55 31
Var n: integer;
function oct(x: integer): string;
var s: string;
begin
while x > 0 do
begin
s := IntToStr(x mod 8) + s;
x := x div 8;
end;
Result := s;
end;
begin
write('Введите число: ');
readln(n);
writeln('Восьмиричная форма: ', oct(n))
<span>end.</span>