Предмет: Информатика,
автор: 3457788
Пленник, которого держали в охраняемой землянке, делал подземный ход. В первую ночь он прокопал ход длиной 1 м. Каждую следующую ночь из-за потери сил он делал ход на 5% короче. Через сколько дней он сможет сбежать, если до свободы путь 13 м?
Турбо Паскаль
Ответы
Автор ответа:
0
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.
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.
Интересные вопросы
Предмет: Алгебра,
автор: porvina1984
Предмет: Математика,
автор: caljukelena74
Предмет: География,
автор: Аноним
Предмет: Химия,
автор: kristina0945
Предмет: Биология,
автор: Nastyabzv