Var n,S,k:integer;
Begin
Write('n = ');ReadLn(n);
S:=0;
k:=0;
While n > 0 do
Begin
S:=S+n mod 10;
k:=k+1;
n:=n div 10
End;
WriteLn(k/S);
End.
Налить в 9литровое
Перелить в 5литровое
Вылить из 5литрового
Перелить в 5литровое
Налить в 9литровое
Перелить в 5литровое
Вылить из 5литрового
Перелить в 5литровое
Вылить из 5литрового
В 9литровом останется 3л
По формуле
, где N - кол-во символов в алфавите, i - объём информации в одном символе. Получаем
. Значит i=2, т.е. каждый символ равен 2 битам.
30 строк*70 символов в строке= 2100 символов на странице
2100 символов*5 страниц=10500 всего символов
Далее нужно умножить общее кол-во символов на 2 бита 10500*2=21000
Далее переводим из битов в байты 21000/8=2625 байт
Ответ: 2625 байт
Прямые углы, все стороны равны, проведённые диагонали равны.