решите ребус по информатике​

ави все верно

ответ:клавиатура

Объяснение:

АвИ

var

 a:array of double;

 i,n,j:integer;

procedure swap(var x,y: double);

  var t: double;

begin

   t := x;

   x := y;

   y := t

end;

 

begin

 write('Кол-во чисел: '); readln(n);

 setlength(a,n);

 dec(n);    

 for i:=0 to n do

   readln(a[i]);

 writeln;  

 for i:=0 to n do

   write(a[i]:6:2);

 writeln;    

 for j:=0 to n-1 do

   for i:=0 to N-j-1 do

     if a[i] < a[i+1] then

       swap(a[i],a[i+1]);        

 for i:=0 to n do

   write(a[i]:6:2);

 writeln;  

end.

Если моё решение вам, пометьте его лучшим !

Фотографии от Насти дошли на 18 секунд быстрее.

Объяснение:

1) вычислим, сколько весят фотографии без сжатия. Составим пропорцию:

х  -  100%

4 Мб  -  80%

х = 4 Мб * 100% / 80% = 5 Мб  - вес всех фотографий без сжатия;

2) скорость передачи данных = 512 Кб/c = 512 / 1024 Мб/с = 0,5 Мб/с

3) t = I / v

Время, за которое сообщение Маши отправилось Артёму: 4 Мб / 0,5 Мб/c = 8 секунд. Добавляем +20 секунд на сжатие (распаковка не считается, так как нужно именно время, за которое дошло). Получается, весь процесс занял 28 секунд.

Время, за которое сообщение Насти отправилось Артёму: 5 Мб / 0,5 Мб/c = 10 секунд

Разность: 28 секунд - 10 секунд = 18 секунд

ответ: на 18 секунд быстрее.