82. Уточните, каков объём жёсткого диска компьютера, к которому вы имеете доступ дома или в школе. Сколь-
ко страниц текста можно было бы разместить в памяти
этого компьютера (на странице размещается 40 строк по
60 символов в каждой строке)? Какой была бы высота та-
кой стопки страниц, если высота стопки из 100 страниц
равна 1 см? ( объем жеского диска 931.51гб) формула нужно
type omas=array[1..n] of integer;
Procedure Del (var z:omas; k:byte);
var i:byte;
begin
for i:=k to n-1 do z[i]:=z[i+1];
z[n]:=0;
end;
var a:omas; i,b:integer;
begin
Randomize;
for i:=1 to n do
begin
a[i]:=random(20);
write(a[i]:4);
end;
writeln;
b:=6;
i:=1;
while (i<=n)and(a[i]<>b) do i:=i+1;
if i<=n then
begin
Del(a,i);
writeln('Размерность массива = ',n-1);
for i:=1 to n-1 do write(a[i]:4);
writeln;
end else writeln('Массив не изменился');
end.
Пример:
12 13 6 7 17 1 18 17 3 2 12 3 16 6 7 13 0 2 5 18
Размерность массива = 19
12 13 7 17 1 18 17 3 2 12 3 16 6 7 13 0 2 5 18
Чтобы найти скорость передачи файла, нужно количество кБайт(S) разделить на время, за которое этот файл передался. Так как последующий файл отправляется по тому же соединению, то их скорости равны. Значит нужно некоторое x разделить на 48 секунд (или минут, если ты перевёл(ела) в минуты).
5000/120=х/48
120х=240000
х=2000
Или, если ты перевёл в минуты, то
5000/2=х/0,8
2х=4000
х=2000
ответ: 2000