Скорость передачи данных по сети Bluetooth равна 2 Мбит/с. За сколько секунд удастся передать рисунок объёмом 3⋅10 в 6 степени байт?

12 c

Мегаби́т = 10⁶ или 1000000 бит.

1 байт = 8 бит.

2Мбит = 2 * 10^6 бит = 2 * 10^6 / 8 байт = 250 000 байт.

Скорость = 2Мбит/c = 250 000 байт/c

Рисунок = 3*10^6 = 3 000 000 байт

Время = 3 000 000 / 250 000 = 12 c

program xxx;

  var i, n, s, k : integer;

                        a : array [1..20] of integer;

begin

  write('введите n=');

  readln(n)

  writeln('введите элементы массива а: ' );

  for i: =1 to n do

        readln(a[i]);

  s: =0;

  k: =0;

  for i: =1 to n do

      if a[i] mod 8 = 0 then begin s: =s+a[i]; k: =1 end;

  if k=0 then write ('элементов кратных 8 - нет')

                      else write('сумма элементов кратных 8 =', s);

  readln

end.

var

  s: string;

  i: longint;

begin

  readln(s);

for i: =1 to length(s) div 2 do write(s[i]);

end.