Вычисление часов

@лёлька · Регистрация: 02.02.2010

Студворк — интернет-сервис помощи студентам

Написать программу, которая вычисляет время (в часах), через которое будет не менее амеб, если известно, что в начале имеется 1 амеба, и амеба делится пополам каждые 3 часа

@Puporev · 09.02.2010, 10:42

Pascal

uses crt;
var n,k,t:integer;
begin
clrscr;
write('N=');
readln(n);
k:=1;t:=0;
while k<n do
 begin
  k:=k*2;
  t:=t+3;
 end;
write('K=',k,'  T=',t);
readln
end.

@лёлька 17 / 17 / 0 Регистрация: 02.02.2010 Сообщений: 92
		1
	Вычисление часов 09.02.2010, 09:18. Показов 1208. Ответов 1 Метки нет (Все метки) Написать программу, которая вычисляет время (в часах), через которое будет не менее амеб, если известно, что в начале имеется 1 амеба, и амеба делится пополам каждые 3 часа 0

Опции темы

Вычисление часов

Решение