Файл размером 3 мб передается через некоторое соединение в течение 24 секунд , сколько секунд будет передоваться файл размером 512 к'байт через это же соединение?

var s : string; k,f : longint; begin  readln(s);   val(s[1],k,f);   if f< > 0 then writeln('некоректно введена строка')   else if length(s)-1=k then writeln('равно')            else writeln('неравно'); end.

а где сама таблица? все равно она везде одинаковая, так что держите фрагмент ваш:

byck is my dog.