Для начала надо найти Iк(обьем 1 книжки) для этого (кол.страниц×кол.строк×кол.символов×чем кодируется 1 символ(1байт=8 бит)
Iк=1000×100×80×8=64'000'000 бит=8'000'000 байт=7'812.5 килобайт= 7.62 мегабайт.После это Iд(Обьем жесткого диска)переводим в мегабайты
160гигабайт=163'840 мегабайт, чтобы найти сколько поместится книг нужно (Iд÷Iк)
163'840÷7.62=21'501.31 округляем получаем 21'501 поместится в жесткий диск.
Ответ:21'501 книг поместится в жесткий диск.
P.S: Знак (') я писал, чтобы легче было распознать число.
Информация-это сведения о-чем либо,независимо от формы их представления.
Program qq;
const n=15;
var a:array[1..n] of Integer;
i:Integer;
begin
for i:=1 to n do begin
a[i]:=random(70-20);
write(a[i]:4);
end;
writeln;
for i:=1 to n do begin
if a[i] mod 2 = 0 then a[i]:=0;
write(a[i]:4);
end;
end.
<span>В зелье Баба Яга положила мухоморы и паганки. Всего 26 грибов. Сообщение о том, что положила мухоморы, несет 4 бита информации. Сколько было поганок?
Ответ:2</span>
Y=0
INPUT A
INPUT B
FOR X=A TO B
IF X MOD 2 = 0 THEN Y=Y+A
NEXT X
END