Файл размером 9 кбайт передаётся через некоторое соединение со скоростью 1024 бит в секунду. определите на сколько секунд быстрее можно передать этот же файл через другое со-единение со скоростью 1536 бит в секунду.

1024/8=128 байт (скорость 1 соединения) 9*1024=9216байт(размер) 9216/128=72cек=1мин 12 сек(передача с соединения 1) 1536/8=192  байт  (скорость 2 соединения)9216/192=48сек (передача с соединения 2)72-48= 24 на 24 сек  быстрее можно будет  передать этот же файл через другое со-единение

T1 = 9*1024*8/1024 = 72c t2 =  9*1024*8/1536 = 48c72 - 48 = 24 cответ на 24с

Var m: array[1..15] of real;   i: integer;   n: real;   begin  randomize;   for i: =1 to 15 do  begin  m : =random(20)-20;   if( m< 0) then  begin  m: =sqr(m);   end;

совершенное число это число равное сумме своих делителей отличных от самого числа

var i, s,j : integer;

begin for i : = 5 to 200 do begin s : = 0; for j : = 1 to i div 2 do if (i mod j = 0) then s : = s + j; if s = i then writeln(i); end; end.