// PascalABC.NET 3.0, сборка 1088
begin
var a:=ArrRandom(35,1,38);
a.PrintLn;
Writeln(a.Where(x->x mod 5=0).Aggregate((x,y)->x*y))
end.
Тестовое решение:
35 1 3 3 1 19 31 38 31 32 33 10 7 22 21 1 18 17 19 32 21 18 31 30 10 2 23 34 33 23 12 25 12 5 30
393750000
Ответ:
20 байт
Объяснение:
Рассмотрим личный код. У нас используется алфавит из 14 символов.
2^3<14<2^4, Получается, что один символ кодируется 4 битами.
Всего в личном коде 19 символов. 19*4=76 бит, переводим в байты и округляем до целого значения 76/8 это 10 байт.
Рассмотрим теперь код подразделения. Нам нужно записать 1500 в двоичном коде. 255 - 1 байт, значит на 1500 нам потребуется 6 байт.
Всего на сотрудника выделено 36 байт. Из них используются 10+6=16
Таким образом на личную информацию выделяется 36-16=20 байт
Див - целое число от деления
будет 3