Сделай её в программе, в которой вам сказал учитель, нажми в меню программы файл, потом нажми сохранить как и выбери место (флешку), где нужно сохранить файл
//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.
1000 байтов,1024 бита,10 битов,1 байт, 1 бит.(1 байт=8 бит)
64*40*48*8=983040 бит /8/1024 = 102 КБ
Ответ: 3.