(см. объяснение)
Объяснение:
Первый :
Воспользовавшись возможностями PascalABC.NET, напишем программу:
begin
var a: array of integer := seqGen(5807,x->x+2595).Where(x->(x mod 2 = 0) and (x mod 13 <> 0)).ToArray();
a.Count.Println; a.Sum.Println;
end.
Второй :
Чистый Pascal тоже позволяет решить эту задачу, только вот код сильно длиннее:
var i,k,sum: integer;
k:= 0;
sum:= 0;
for i:= 2595 to 8401 do
if((i mod 2 = 0) and (i mod 13 <> 0)) then
k:= k+1;
sum:= sum+i;
end;
writeln(k);
writeln(sum);
В обоих случаях получаем два числа: 2679 и 14728918.
Задание выполнено!
1. Во втором письме содержится меньшее количество информации на 5 500 бит
2. 256 секунд
1.
I = К * i, где
I - информационный объём письма (документа)
К - количество символов в письме (документе)
i - информационный вес символа (количество бит, которым кодируется 1 символ)
N = 2^i, где
N - мощность алфавита (количество символов в алфавите)
Дано:
K₁ = 25 строк * 50 символов = 1 250 символов
N₁ = 256 символа
K₂ = 2 страницы * 15 строк * 30 символов = 900 символов
N₂ = 32 символа
Найти:
I ₁ - I₂
256 = 2^i ₁
i₁ = 8 бит
32 = 2^i ₂
i₂ = 5 бит
I₁ = 1 250 * 8 = 10 000 бит
I₂ = 900 * 5 = 4 500 бит
I ₁ - I₂ = 10 000 - 4 500 = 5 500 бит
2.
I - информационный объём сообщения (документа)
К - количество символов в сообщении (документе)
К = V * t, где
K - количество символов в сообщении (документе)
V - скорость печати принтера
t - время печати принтера
V = 1 024 символа/с
I = 256 Кбайт = 262 144 байт
i = 1 байт (предположительно)
t
I = К * i
К = I / i
К = 262 144 / 1 = 262 144 символов
К = V * t
t = К / V
t = 262 144 / 1 024 = 256 секунд
1 Кбайт = 1024 байт
(см. объяснение)
Объяснение:
Первый :
Воспользовавшись возможностями PascalABC.NET, напишем программу:
begin
var a: array of integer := seqGen(5807,x->x+2595).Where(x->(x mod 2 = 0) and (x mod 13 <> 0)).ToArray();
a.Count.Println; a.Sum.Println;
end.
Второй :
Чистый Pascal тоже позволяет решить эту задачу, только вот код сильно длиннее:
var i,k,sum: integer;
begin
k:= 0;
sum:= 0;
for i:= 2595 to 8401 do
if((i mod 2 = 0) and (i mod 13 <> 0)) then
begin
k:= k+1;
sum:= sum+i;
end;
writeln(k);
writeln(sum);
end.
В обоих случаях получаем два числа: 2679 и 14728918.
Задание выполнено!
1. Во втором письме содержится меньшее количество информации на 5 500 бит
2. 256 секунд
Объяснение:
1.
I = К * i, где
I - информационный объём письма (документа)
К - количество символов в письме (документе)
i - информационный вес символа (количество бит, которым кодируется 1 символ)
N = 2^i, где
N - мощность алфавита (количество символов в алфавите)
i - информационный вес символа (количество бит, которым кодируется 1 символ)
Дано:
K₁ = 25 строк * 50 символов = 1 250 символов
N₁ = 256 символа
K₂ = 2 страницы * 15 строк * 30 символов = 900 символов
N₂ = 32 символа
Найти:
I ₁ - I₂
256 = 2^i ₁
i₁ = 8 бит
32 = 2^i ₂
i₂ = 5 бит
I₁ = 1 250 * 8 = 10 000 бит
I₂ = 900 * 5 = 4 500 бит
I ₁ - I₂ = 10 000 - 4 500 = 5 500 бит
2.
I = К * i, где
I - информационный объём сообщения (документа)
К - количество символов в сообщении (документе)
i - информационный вес символа (количество бит, которым кодируется 1 символ)
К = V * t, где
K - количество символов в сообщении (документе)
V - скорость печати принтера
t - время печати принтера
Дано:
V = 1 024 символа/с
I = 256 Кбайт = 262 144 байт
i = 1 байт (предположительно)
Найти:
t
I = К * i
К = I / i
К = 262 144 / 1 = 262 144 символов
К = V * t
t = К / V
t = 262 144 / 1 024 = 256 секунд
1 Кбайт = 1024 байт