первые 10 натуральных чисел, которые кратны 8, начиная от 1000
<em>// PascalABC.NET 3.2, сборка 1412 от 25.03.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ReadSeqIntegerWhile('Вводите, 0- конец:',k->k<>0).ToArray;
Writeln('П=',a.Aggregate(BigInteger(1),(x,y)->x*y))
end.
<u>Пример</u>
Вводите, 0- конец: 61 1 -86 -23 -35 -57 96 -54 -3 -90 -12 -62 3 -47 27 90 85 0
П=7300372606875554895360000
Ответ:
2)37байт=296 бит
1 кб=1024 байт
1мб.
Объяснение:
1)В одной байте 8 битов.Следовательно:нужно 37×8.