Решение
var count, max, i: integer;
begin
max := 0;
count := 0;
for i := 8812 to 12285 do begin
if (i mod 8 = 0) or (i mod 19 = 0) then
if i mod 4 <> 0 then
if i mod 9 <> 0 then
if i mod 14 <> 0 then
if i mod 16 <> 0 then begin
count := count + 1;
if i > max then
max := i;
end;
end;
writeln(count, max);
end.
ответ: 11712274
Решение
Согласно условию, в номере могут быть использованы 10 цифр (0..9) и 18 букв, всего 10 + 18 = 28 символов. Известно, что с N бит можно закодировать 2^N различных символов. Поскольку 24 < 28 < 25, то для записи каждого из 28 символов необходимо 5 бит.
Для хранения всех 7 символов номера нужно 7 * 5 = 35 бит, а т.к. для записи используется целое число байт, то берём ближайшее не меньшее значение, кратное восьми, это число 40 = 5 * 8 бит (5байт).
Тогда 60 номеров занимают 5 * 60 = 300 байт.
ответ
300 байт
