Перевод из бит в мегабайт в с :80*10^20 бит в секунду = 0.00001 мегабайт в секундуперевод 1 м 20с в секунды : 80с находим файл : 80с * 0.00001 мегабайт в секунду = 0,0008 мегабайт
Ван нужно перевести килобайты в байты?
0,25 Кб = 256 б
Не уверен, но надеюсь правильно)
var a,b,Cmod,Cdiv:integer;
begin
readln(a);
readln(b);
Cmod:=a;
Cdiv:=0;
repeatCmod:=Cmod-b;
inc(Cdiv);
until Cmod<b;
writeln(Cdiv,' ',Cmod);
readln;
<span>end.</span>