Нет это только с интернетом
Var a:integer;
d:string;
f:char;
begin
writeln('введите сторку');
readln(d);
for a:=1 to length(d) do begin
f:=d[a];
write(f);
write(' ');
end;
<span>end.</span>
2 минуты = 120 секунд
8 Мбит/с = 8.388.608 бит/с
1) 8388608 / 2 = 4194304
2) 4194304 / 2 = 2097152
3) 2097152 / 2 = 1048576
4) 1048576 / 2 = 524288
5) 524288 / 2 = 262144
6) 262144 / 2 = 131072
7) 131072 / 2 = 65536
8) 865536 / 2 = 32768
9) 32768 / 2 = 16384
10) 16384 / 2 = 8192
11) 8192 / 2 = 4096
12) 4096 / 2 = 2048
13) 2048 / 2 = 1024 =
Прибавим в степень еще действия выше, получим -
Для того, чтобы найти размер файла умножаем скорость на время, получаем:
бит
Переводим в мегабайты, учитывая, что
Мб:
Мб
Ответил так, чтобы можно было решать такие задачи на бумаге. Т.е. путем представления цифр в виде "2 в степени"