<u><em>В США была создана первая отечественная ЭВМ.</em></u>
Var
a : array [1..8] of integer;
i, count, sum : integer;
begin
randomize;
for i := 1 to 8 do
a[i] := random (10) + 1;
count := 0; sum := 0;
for i := 1 to 8 do
if a[i] mod 2 = 0 then count := count + 1
else sum := sum + a[i];
writeln ('count = ', count);
writeln ('sum = ', sum);
end.
(I - информационный объем текста, K - кол-во символов, i - вес одного символа/бит на символ)
Дано:
K = 155 * 55 * 58 = 494450 шт
По формуле (N - мощность алфавита, i - вес одного символа)
бит (округляем в большую сторону так как кусками тут быть не может)
I - ?
Решение:
I = K * i = 494450 * 15 бит = 7416750.0 бит
7416750.0 бит = 927093.75 байт = 905.364990234375 Кбайт
Ответ 905