В пробирке n микробов.В какой-то момент медли в пробирку попадает вирус.В

В пробирке n микробов.В какой-то момент времени в колбу попадает вирус.В первую минуту он истребляет одну бактерию,после чего вирус и бактерии делятся в каждую последующую минутку вирусы уничтожают по одной бактерии и опять делятся.Через сколько минут вирусы уничтожат все бактерии? Необходимо привести решение в Паскале.Очень срочно!

Задать свой вопрос
1 ответ
Var b, v, t:integer;begin     write('Skolko bilo bakteriy?'); readln(b);     v := 1;     t := 0;     while b gt; 0 do     begin          b := b - v;          b := b * 2;          v := v * 2;          t := t + 1;     end;     writeln(t);end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт