Каждая бактерия делится на две в течение одной минуты. В начальный момент времени имеется одна бактерия. Составьте программу, которая рассчитываетколичество бактерий на заданное пользователем с клавиатуры целое значение момента времени 15 минут. Мне через Паскаль нужно и еще что бы через операторы white и do.Срочно нужно спасибо заранее.
Var a,b,c:integer; Begin a:=1; b:=0; write('Введите кол-во минут: '); readln(c); while (b<>c) do begin a:=a*2; b:=b+1; end; writeln(a); end.