По каналу связи за 1/3 часа было передано 3000 Кбайт информации. Определить скорость передачи информации. С решением.
а) 2,5 Кбайт/с;
б) 1000 байт/мин;
в) 1000 Кбайт/мин;
г) 2,5 байт/мин;
д) 5 Кбайт/с.

можно назвать - собака 

или 

агент @ мail.ru 

program;   var  i: byte;   str: string;   begin  for i: =60 to 70 do  begin  str: =str+chr(i) ;   end;   writeln(str);   end.

varb: array [1..8] of integer; r,q: integer; begin  for r: =1 to 8 do  begin  q: =0;   read(b[r]);   end;   for r: =1 to 8 do  if b[r] mod 2=1 then q: =q+b[r];   writeln;   writeln('сумма нечетных чисел равна ',q); end.

var

s,a,n,i,min,max: integer;

begin

min: =32767;

max: =-32768;

readln(n);

for i: =1 to n do

begin

readln(a);

if a< min then min: =a;

if a> max then max: =a;

end;

s: =(min+max)/2;

writeln(s);

end.