Question

Каждая бактерия делится на две в течение одной минуты. В начальный момент имеется A бактерий. Сколько времени потребуется, чтобы количество бактерий превзошло X?
НА ПАСКАЛЕ ПЛИЗ!

Answer 1

var
i,x,a:integer;
begin
writeln('Кол-во бактерий');
readln(a);
writeln('Необходимое кол-во');
readln(x);
i:=0;
while a<x do
begin
a:=a*a;
i:=i+1;
end;
writeln('Требуется ',i,' минут');
end.

Answer 2

Почему I = 0?

Answer 3

потому что если пройдет 1 минута бактерий станет вдвое больше

Answer 4

И почему нигде X не учитывается? Ибо если я введу 2 и 4, то будет 1 минута, это не правильно.

Answer 5

И что такое I? Время?

Answer 6

И зачем "необходимое кол-во"?