Скорость передачи данных через adsl-соединение равна 16384 байт/с.через данное соединение файл размером 1 мегабайт.определите время передачи файла в секундах.

16384 байт / 1024 = 16 мегабайт, следовательно, файл  передаётся за 16 секунд. это если ты где-то ошибся, иначе 16 надо ещё поделить 1024, что маловероятно..

program raf105;

var

  n,i,x,sum,pro,kol1,kol2: integer;

begin

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

  readln(n);

  writeln('вводите ',n,' чисел по очереди');

  pro: = 1;

  for i: =1 to n do

  begin

    readln(x);

    if x > 0

      then begin

        sum: = sum+x;

        kol1: = kol1+1;

      end;

    if x < 0

      then begin

        pro: = pro*x;

        kol2: = kol2+1;

      end;

  end;

  writeln('количество положительных: ',kol1);

  writeln('сумма положительных: ',sum);

  writeln('количество отрицательных: ',kol2);

  writeln('произведение отрицательных: ',pro);

end.

pascalabc 3.4.2

1)d=(-37)^2-4*1*27=1369-108=1261 x1=)+35,5)/2*1=72,5/2 x1=36,25 x2=)-35,5)/2=1,5/2 x2=0,75 x1+x2=36,25+0,75=37 x2=36,25*0,75=27,19 2) x(x-210)=0 x1=0 x2=210 x1+x2=0+210=210 x1*x2=0*210=0 3)y(1-y)=0 y1=0 y2=1 y1+y2=0+1=1 y1*y2=0*1=0 4)d=41^2-4*1*(-371)=1681+1484=3165 x1=(-41+56,26)/2=15,26/2 x1=7,63 x2=(-41-56,26)/2=-97,26/2 x2=-48,63 x1+x2=7,63+(-48,63)=-41 x1*x2=7,63*(-48,63)=-371,05 5)y1=√19 y2=-√19 y1+y2=√19-√19=0 y1*y2=√19*(-√19)=-√(19)^2=-19 6)x1=√(10/3) x2=-√(10/3) x1+x2=√(10/3)+(-√(10/3))=0 x1*x2=√(10/3)*(-√(10/3))=-10/3