В первый день тренировочного цикла Катя пробегает 2 км,а каждый последующий день-в 2 раза больше,чем в предыдущий.Тренер Кати прекращает цикл,когда километраж одной тренировки превышает S.Сколько дней длится тренировочный цикл Кати?
ПРИМЕР
Ввод:1000
Вывод:10
Использовать цикл while
ПРИМЕР
Ввод:1000
Вывод:10
Использовать цикл while
More Questions From This User See All
Answers & Comments
tren=0
kilom=2
while (kilom<s){
kilom=kilom*2
tren=tren+1
}
return tren
var n,i,s:real;
begin
read(s);
writeln('километраж=',s);
i:=1;
n:=0;
while i<=s do
begin
i:=i*2;
n:=n+1;
end;
writeln(n,' дн. длится тренировочный цикл Кати');
end.