ИЗИ ЗАДАНИЕ (35 БАЛЛОВ!!!)Любая амеба делится на две в течении одной

ИЗИ ЗАДАНИЕ (35 БАЛЛОВ!!!)

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

Вот программа через While: (фото)

Надобно СДЕЛАТЬ 2 Программки!!! ОДНУ ЧЕРЕЗ REPEAT, Иную ЧЕРЕЗ FOR!!!

Задать свой вопрос
1 ответ

Программа c repeat

program bacteria_1;

var bac,min:integer;

begin

bac:=1;

write('Введите количество минут: ');

readln(min);

repeat

 bac:= bac*2;

 min:= min-1

until min=0;

writeln('Стало ',bac,' бакт.');

end.

Программка с for

program bacteria_2;

var bac,min,i:integer;

begin

bac:=1;

write('Введите количество минут: ');

readln(min);

for i:=1 to min do

begin

 bac:= bac*2;

 min:= min-1

end;

writeln('Стало ',bac,' бакт.');

end.

Написано на языке PascalABC.NET

Леонид Бартольд
СПАСИБО ТЕБЕ БОЛЬШОЕ :)
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт