0000011001000111
Объяснение:
Делим 1607 на 2 до тех пор, пока не сможем (то есть пока делимое число не станет равным единице). Получим результат:
11001000111
Нам дана двухбайтовая ячейка. Переведём из байт в биты.
2 байта = 2 · 8 бит = 16 бит.
Нолик или единица по отдельности - это один бит (условно; на самом деле - это выделяемая под них память). В нашем результате 11 бит (то есть 11 ноликов и единичек в сумме), остальные 5 остались незаполненными - отсюда и заполнение нулями (поскольку они ничего в результате не поменяют - таково устройство памяти и двоичного кода).
var a: integer;
begin
readln(a);
write((a div 100) * (a div 10 mod 10) * (a mod 10))
end.