Прежде всего переведем скорость из бит/с в кбайт/с 1 байт/с=8 бит/с 512000/8=64000 байт/с 1 кбайт/с=1024 байт/с 64000/1024=62,5 кбайт/с - скорость передачи 62,5*8=500 кбайт - размер файла
Если лень перебирать вручную, можно воспользоваться программой
var k,l,r,x,f:integer; begin f := 3001; l := 0; r := 65534; x := (l + r) div 2; k := 1; while (x <> f) and (l < r) do begin writeln(k,' ',l,' ',r,' ',x); k := k + 1; if f < x then r := x - 1 else l := x + 1; x := (l + r) div 2 end; writeln(k,' ',l,' ',r,' ',x); end.
if ((p >= 0) && (l > 0) && (k > 0) && ((strlen(C) - p) >= l) && (p <= strlen(C))) //проверка ввода { __asm { mov ebx, k; // количество повторений mov edi, V // адрес приёмника m1 : cmp ebx, 0 // сравнение je exit1 // если EBX = 0, то переход на exit1 mov ecx, l // длина строки mov esi, C // адрес источника add esi, p // с заданной позиции m2 : mov al, [esi] //из ESI mov [edi], al // запись в EDI inc edi // EDI+1 inc esi // ESI+1 loop m2 // цикл EСХ раз dec ebx // EBX-1 jmp m1 // переход на m1 exit1 : mov[edi], 0 }
1 байт/с=8 бит/с
512000/8=64000 байт/с
1 кбайт/с=1024 байт/с
64000/1024=62,5 кбайт/с - скорость передачи
62,5*8=500 кбайт - размер файла