1 символ весит 8 бит
5,5 кб это 44000 бит
44000 бит / 8 символов
5 500 символов.
var vivod,vvod:integer;
begin
readln(vvod);
while(vvod <> 0) do
vivod:=vvod;
vvod := vvod div 10;
end;
writeln(vivod);
end.
program qq;
var t, c: real;
writeln('Введите кол-во минут');
readln(t);
c:= t*2;
writeln(c, 'бактерий будет через', n, 'минут');
это очень просто
c=50