Одноклеточная амеба каждые 3 часа делится на две клетки. Вывести на экран количество амеб за каждые 3 часа суток

@KriSSka · Регистрация: 21.03.2012

Одноклеточная амеба каждые 3 часа делится на две клетки. Вывести на экран количество амеб за каждые 3 часа суток, а также общее количество амеб за двое суток.
желательно с циклом while

valeriikozlov · 10.04.2012, 19:27

Pascal

var i, col:longint;
begin
col:=1;
while i<=24 do begin
writeln('В ', i, ' часов ', col, ' амеб(ы)');
i:=i+3;
col:=col*2;
end;
writeln('За двое суток ', col*128, ' амеб');
end.

@KriSSka 0 / 0 / 0 Регистрация: 21.03.2012 Сообщений: 3
		1
	Одноклеточная амеба каждые 3 часа делится на две клетки. Вывести на экран количество амеб за каждые 3 часа суток 10.04.2012, 16:19. Показов 7033. Ответов 1 Метки нет (Все метки) Одноклеточная амеба каждые 3 часа делится на две клетки. Вывести на экран количество амеб за каждые 3 часа суток, а также общее количество амеб за двое суток. желательно с циклом while 0

Опции темы

Одноклеточная амеба каждые 3 часа делится на две клетки. Вывести на экран количество амеб за каждые 3 часа суток

Решение