Проще всего осуществить слияние данных, следуя указаниям Мастера слияния, который запускается с помощью кнопки Начать слияние на вкладке Рассылки.
"Мозг" компьютера это процессор
Если кодировка ASSCII, 21 байт, если Unicode, то 42 байта. Единичка в конце это восклицательный знак? Он тоже входит в предложение?
<u>PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
var n:=ReadInteger('n=');
var p:=1;
while n>0 do begin
var d:=n mod 10;
if d.IsOdd then p*=d;
n:=n div 10
end;
Writeln('Произведение нечетных цифр числа равно ',p)
end.
<u>Пример</u>
n= 53892
Произведение нечетных цифр числа равно 135