Увеличить на 4 все элементы в первой половине массива А (считать, что в массиве чётное число элементов)

Program primer;

Uses crt;

var i,n: integer;

a:array[1..100] of integer;begin clrscr;

randomize;

write('Pazmer massiva  = ');  

readln(n);      

for i:=1 to n do      

a[i]:= random(100)-50;

for i:=1 to n do      

write(a[i]:5);

writeln;      

writeln;    

for i:=1 to (n div 2) do      

write((a[i]+4):5);            

for i:=((n div 2)+1) to n do      

write(a[i]:5);      

readln;

end.

Потому что соединение не идеально, оно прерывается, некоторые данные по пути теряются. Допустим, я хочу передать файл по интернету. Если файл небольшой, то велика вероятность, что он не пострадает. В противном случае можно потратить много времени на передачу части файла, после чего данные передадутся с ошибкой, которую мы обнаружим только после передачи всего файла. Передавая информацию пакетами же можно этого избежать, так как любая потеря данных будет сразу видна по плохому пакету. После этого можно эту ошибку сразу и обработать и, допустим запросить повтор предыдущего пакета или попытаться починить пакет, прибывший с ошибкой.

Для  данной сортировки используем алгоритм сортировки слиянием

В начале разбиваем арбузы на 2 группы по 2Каждую группу взвешиваем и сортируем (т.е. всего 2 взвешивания)Теперь собираем вместе, сравниваем сначала более легкие арбузы и находим самый легкий (всего 3 взвешивания)Теперь сравниваем тяжелый арбуз, что в группе с самым легким и более легкий из другой группы, и определяем второй по легкости (всего 4 взвешивания)Потом взвешиваем оставшиеся арбузы и докладываем их  по порядку (всего 5 взвешивания)