Предмет: Информатика,
автор: 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.
Похожие вопросы
Предмет: Английский язык,
автор: dan5991
Предмет: Русский язык,
автор: mataevbaisangur
Предмет: Математика,
автор: bays1304
Предмет: Математика,
автор: beka23h
Предмет: Алгебра,
автор: asorokin46