//PascalABC.NET
begin
var product: int64;
product := 1;
var seq := range(1, 99).Where(x -> x mod 2 <> 0).Select(x -> x * x);
foreach var x in seq do
product := product * x;
write(product);
end.
2048 символов. <span>1 МБ = 1024 Кбайт .</span><span>1/512 МБ = 2 Кбайта.
</span>
<span>Итак, 2 Кбайта = 2048 байт = 2048 символов. </span>
<span>Итого, 1 символ весит 1 байт. </span>
<span>В 1 байт можно вставить числа от 0 до 255, в алфавите 256 символов.</span>
0,824 = 8 × 10⁻¹ + 2 × 10⁻² + 4 × 10⁻³
БЕГ – бог – бок – бак – мак – маг – ШАГ;
МОРЕ – горе – гора – кора – кома – кума – сума – СУША;
<span>МИГ – мир – пир – пар – бар – бас – бес – вес – ВЕК</span>