Ответ:
Команда говорить и изменить размер
<h3>Если число цифр нечетное, среднюю цифру не учитываем.</h3><h3>PascalABC.NET 3.4.2, сборка 1847 от 28.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var (n, S) := (ReadInteger, 0);
loop Trunc(Log10(n) + 1) div 2 do
begin
S += n mod 10;
n := n div 10
end;
S.Println
end.
<h2>12345678</h2><h2>26 </h2>
Это картинка,на которой изображен порядок и меры предосторожности в кабинете информатики,с компьютером,и безопасность в интернете.
Определяем время передачи первого файла:
V=240 кбайт=240*1024*8 бит
v=192 бит/с
t=V/v=240*1024*8/192=10*1024=10240 секунд
Для второго файла:
v=640 бит/с
t=1024*10 секунд
V -?
V=v*t=640*1024*10 бит=640*1024*10/(8*1024) кбайт=800 кбайт
Ответ: 800 кбайт