В основном просто перемножить
Вес файла = вес одного символа * кол-во символов в файле
1 38 * 2 = 76 байт
2 64 * 48 * 4 * 8 = 98304 бита = 12288 байт = 12 кбайт
(кол-во симв) * вес символа
3
k - кол - во символов, тогда
2048 + 8 * k = 16 * k
объем первоначального равен 8k
из уравнения следует что 8k = 2048 бит = 256 байт
<span> по-моему, ответ - Г.</span>
<span>128 с - (1024 * 64 / 100) м</span>
<span>x c - 100 м</span>
<span>x = (128 * 100 * 100) / (1024 * 64) = 19.53</span>
Var
a:array [1..1000] of integer;
i,n,sum:integer;
begin
randomize;
write('Введите максимальное число массива:');
Readln(n);
begin
for i:=1 to n do
a[i]:=random (20)+20;
end;
Writeln('Массив состоит из следующих чисел:');
for i:=1 to n do
write(' ',a[i]);
Writeln();
sum:=0;
for i:=1 to n do
if a[i] mod 2 = 0 then sum:=a[i]+sum;
// НОД(a,b)*НОК(a,b)=a*b
procedure nod(x,y: integer; var n: integer);
begin
repeat
if x>y then x:=x mod y
else y:=y mod x;
until (x=0)or(y=0);
n:=x+y;
end;
var a,b,c,d,e,n: integer;
begin
readln(a,b,c,d);
nod(a,b,n);
e:=a*b div n;
nod(c,e,n);
e:=c*e div n;
nod(d,e,n);
Writeln('НОК = ',d*e div n);
end.
Пример:
36 54 18 15
<span>НОК = 540</span>
Чётное число — целое число, которое делится на 2 без остатка: …, −4, −2, 0, 2, 4, 6, 8, …
Нечётное число — целое число, которое не делится на 2 без остатка: …, −3, −1, 1, 3, 5, 7, 9,