Пленник, которого держали в охраняемой землянке, делал подземный ход. В первую ночь он прокопал ход длиной 1 м. Каждую следующую ночь из-за потери сил он делал ход на 5% короче. Через сколько дней он сможет сбежать, если до сво...
Пленник, которого держали в охраняемой землянке, делал подземный ход. В первую ночь он прокопал ход длиной 1 м. Каждую следующую ночь из-за потери сил он делал ход на 5% короче. Через сколько дней он сможет сбежать, если до свободы путь 13 м?
Турбо Паскаль
Ответ(ы) на вопрос:
uses crt;
var
len, h : real;
day : integer;
begin len := 13;
h := 1;
clrscr;
while len > 0 do begin
len := len - h;
h := h - h * 0.05;
day := day + 1;
end;
write(day);
end.
Не нашли ответ?
Похожие вопросы