600 000 Кбит = 600 000*1024 бит = 600*1024 000 бит.
При скорости 1024 000 бит/с сообщение будет передано за 600 с = 10 мин
// Насколько я смог разобрать, тебе нужно это
const n = 5;
var a: array [1..n] of integer;
i, j, imax, x: integer;
begin
randomize;
for i:=1 to n do
a[i]:=random(90);
writeln('Исходный массив: ');
for i:=1 to n do
writeln('a['+i+'] = '+a[i]);
writeln();
for i:=1 to n-1 do
begin
imax:=i;
for j:=i+1 to n do if a[j]>a[imax] then imax:=j;
x:=a[i];
a[i]:=a[imax];
a[imax]:=x;
end;
writeln('Отсортированный по убыванию массив: ');
for i:=1 to n do
writeln('a['+i+'] = '+a[i]);
writeln();
end.
Двоичная, восьмиричная и шестнадцатиричная
Судя по коду ошибки, компилятор кажись не нашел файл) создай новый файл и назови main.cpp (в смысле название короткое латинское), перезапусти Visual Studio и радуйся
40*1024=40960байт,,,,,,,,,,,,,,,,,,,,,,,,,,,,