Program Task; Var a, b: Real; Begin Write('a = '); ReadLn(a); Write('b = '); ReadLn(b); WriteLn('Среднее арифметическое: ', ((a + b) / 2):5:2); ReadLn; End.
64КБайта = 65536бай теперь дели это число на 1024 и получаем время 64 сек за которое это файл передаётся. Теперь 256байт умножаем на это время и видам размер в байтах 16384. теперь делим на 1024 и получаем 16 это и есть ответ