Скорость передачи данных по сети 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

есть пара неясностей в условии. если допускается такое, что единица и само число тоже являются делителями, то берите первый вариант решения, иначе - берите второе.

и еще кое-что: если нужно хотя бы 4 делителя, то оставьте все как есть, а если нужно ровно четыре делителя, в строчке  if k> =4 then write(i: 3); уберите знак >   .

1 вариант.

program zadacha;

var n, i, j, k : byte;

begin

write('введите число n');

for i: = 1 to n do begin

k: =0;

for j: = 1 to i do

if i mod j =0 then k: =k+1;

if k> =4 then write(i: 3);

2 вариант.

program zadacha;

var n, i, j, k : byte;

begin

write('введите число n');

for i: = 1 to n do begin

k: =0;

for j: = 2 to (i-1) do

if i mod j =0 then k: =k+1;

if k> =4 then write(i: 3);

32*64

*56*1/1024=112 кбайт