Какой объем информации можно передать по каналку связи, пропускная способность которого 100мбит\с за 2 часа?

72 gb или 720000 mb, просто надо умножить было сколько в минуту и в час.

Const   l = 109; var   v, t, s: real;   n: integer; begin   write('введите скорость васи, км/ч: ');   readln(v);   write('введите время в пути, ч: ');   readln(t);   s : = abs(v) * t;   n : = trunc(s);   if s > n then n : = n + 1;   n : = n mod l;   if v > 0 then writeln('вася остановился на ', n, ' км.')   else writeln('вася остановился на ', l - n - 1, ' км.') end. тестовое решение: введите скорость васи, км/ч: 85.4 введите время в пути, ч: 1.5 вася остановился на 20 км.

Var   x, y: longint;   i: integer; begin   for i : = 1 to 5 do   begin       write('введите число: ');       readln(x);       y : = sqr(x);       if (y mod 2) = 0 then writeln('четное')       else writeln('квадрат числа равен ', y)   end end. тестовое решение: введите число: 1 квадрат числа равен 1 введите число: 2 четное введите число: 3 квадрат числа равен 9 введите число: 4 четное введите число: 5 квадрат числа равен 25