А=("ақпарат",1,18,28) print (а)?
А) Ақпарат 1, 18, 28
В) Ақпарат
С) ('ақпарат', 1, 18, 28)
Д) 1, 18, 28

быстро​

Решение тут простое )

нам абсоютно безразлично что именно будет передаваться по каналу связи, главное какой объем.

Итак у нас объем 100 килобайт.

Переведем в байты:

100 килобайт * 1024 байт в килобайте = 102400 байт.

Переведем в биты:

102400 * 8 бит в байте = 819200 бит.

Найдем теперь пропускную скорость канала в битах в секунду

поучебникам в 1 килобите чаще 1024 бита

100 мбит\сек = 1024*100 килобит в секунду = 1024*1024*100 бит в секунду = 104857600 бит в секунду.

Разделим:

819200/104857600 = 0.0078125 секунд

ответ: 0.0078125 секунд

var

  a, b, c, D, x1, x2: real; 

begin

  writeln('Введите коэффициент при х^2');

  readln(a); //Вводим коэффициент при x^2

  writeln('Введите коэффициент при x');

  readln(b); //Вводим коэффициент при х

  writeln('Введите свободный член');

  readln(c); //Вводим свободный член

  D:= sqr(b) - 4 * a * c; 

  writeln('Дискриминант уравнения равен  ', D : 0 : 5); {Печатаем дискриминант и округляем его до 5 знаков после запятой}

  if D > 0 then 

  begin

    writeln('D > 0 => уравнение имеет два различных действительных корня:');

    x1:= (-b - sqrt(D)) / (2 * a);

    x2:= (-b + sqrt(D)) / (2 * a);

    writeln('x1 = ', x1 : 0 : 5, ', x2 = ', x2 : 0 : 5); {Считаем корни уравнения и печатаем их с округлением до 5 знаков после запятой}

  end;

  if D = 0 then

  begin

  writeln('D = 0 => уравнение имеет два одинаковых действительных корня:');

  writeln('x1 = x2 = ', -b / (2 * a) : 0 : 5); {Если дискриминант равен 0, печатаем два одинаковых корня с округлением до 5 знаков после запятой}

  end;

  if D < 0 then writeln('D < 0 => действительных корней уравнение не имеет'); 

end.